view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

---
abstract: 'Force SSL mode on select pages'
author:
  - 'Andy Grundman, <andy@hybridized.org>'
build_requires:
  Catalyst::Test: 0
  Data::Dumper: 0
  ExtUtils::MakeMaker: 6.42
  File::Spec: 0
  FindBin: 0
  HTTP::Request::Common: 0
  Test::More: 0
configure_requires:
  ExtUtils::MakeMaker: 6.42
distribution_type: module
generated_by: 'Module::Install version 1.02'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: 1.4
name: Catalyst-Plugin-RequireSSL

Makefile.PL  view on Meta::CPAN

auto_set_repository;

requires 'Catalyst' => '5.23';
requires 'MRO::Compat';

test_requires 'Test::More';
test_requires 'Data::Dumper';
test_requires 'FindBin';
test_requires 'File::Spec';
test_requires 'Catalyst::Test';
test_requires 'HTTP::Request::Common';

author_requires 'Test::Pod' => '1.14';
author_requires 'Test::Pod::Coverage' => '1.04';
author_requires 'Test::NoTabs' => '0.9';

extra_tests;

auto_install;

WriteAll;

t/04ssl.t  view on Meta::CPAN

#!perl

use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/lib";

use Test::More tests => 19;
use Catalyst::Test 'TestApp';
use HTTP::Request::Common;

# test an SSL redirect
ok( my $res = request('http://localhost/ssl/secured'), 'request ok' );
is( $res->code, 302, 'redirect code ok' );
is( $res->header('location'), 'https://localhost/ssl/secured', 'redirect uri ok' );
isnt( $res->content, 'Secured', 'no content displayed on secure page, ok' );

# test redirection params
ok( $res = request('http://localhost/ssl/secured?a=1&a=2&b=3&c=4'), 'request ok' );
is( $res->header('location'), 'https://localhost/ssl/secured?a=1&a=2&b=3&c=4', 'redirect with params ok' );