+++ /dev/null
-This file documents the revision history for Perl extension TestApp.
-
-0.01 2009-06-24 17:26:08
- - initial revision, generated by Catalyst
+++ /dev/null
-#!/usr/bin/env perl
-# IMPORTANT: if you delete this file your app will not work as
-# expected. You have been warned.
-use inc::Module::Install;
-
-name 'TestApp';
-all_from 'lib/TestApp.pm';
-
-requires 'Catalyst::Runtime' => '5.80004';
-requires 'Catalyst::Plugin::ConfigLoader';
-requires 'Catalyst::Plugin::Static::Simple';
-requires 'Catalyst::Action::RenderView';
-requires 'parent';
-requires 'Config::General'; # This should reflect the config file format you've chosen
- # See Catalyst::Plugin::ConfigLoader for supported formats
-catalyst;
-
-install_script glob('script/*.pl');
-auto_install;
-WriteAll;
+++ /dev/null
-Run script/testapp_server.pl to test the application.
+++ /dev/null
-package TestApp;
-
-use strict;
-use warnings;
-
-use Catalyst::Runtime 5.80;
-
-# Set flags and add plugins for the application
-#
-# -Debug: activates the debug mode for very useful log messages
-# ConfigLoader: will load the configuration from a Config::General file in the
-# application's home directory
-# Static::Simple: will serve static files from the application's root
-# directory
-
-use parent qw/Catalyst/;
-use Catalyst qw/
- ConfigLoader
- Static::Simple/;
-our $VERSION = '0.01';
-
-# Configure the application.
-#
-# Note that settings in testapp.conf (or other external
-# configuration file that you set up manually) take precedence
-# over this when using ConfigLoader. Thus configuration
-# details given here can function as a default configuration,
-# with an external configuration file acting as an override for
-# local deployment.
-
-__PACKAGE__->config( name => 'TestApp' );
-
-# Start the application
-__PACKAGE__->setup();
-
-
-=head1 NAME
-
-TestApp - Catalyst based application
-
-=head1 SYNOPSIS
-
- script/testapp_server.pl
-
-=head1 DESCRIPTION
-
-[enter your description here]
-
-=head1 SEE ALSO
-
-L<TestApp::Controller::Root>, L<Catalyst>
-
-=head1 AUTHOR
-
-Devin Austin,,,
-
-=head1 LICENSE
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
-
-1;
+++ /dev/null
-package TestApp::Controller::Root;
-
-use strict;
-use warnings;
-use parent 'Catalyst::Controller';
-
-#
-# Sets the actions in this controller to be registered with no prefix
-# so they function identically to actions created in MyApp.pm
-#
-__PACKAGE__->config->{namespace} = '';
-
-=head1 NAME
-
-TestApp::Controller::Root - Root Controller for TestApp
-
-=head1 DESCRIPTION
-
-[enter your description here]
-
-=head1 METHODS
-
-=cut
-
-=head2 index
-
-=cut
-
-sub index :Path :Args(0) {
- my ( $self, $c ) = @_;
-
- # Hello World
- $c->response->body( $c->welcome_message );
-}
-
-sub default :Path {
- my ( $self, $c ) = @_;
- $c->response->body( 'Page not found' );
- $c->response->status(404);
-}
-
-sub test : Local {
- my ($self, $c) = @_;
-
- $c->res->body("herro!");
-}
-
-=head2 end
-
-Attempt to render a view, if needed.
-
-=cut
-
-sub end : ActionClass('RenderView') {}
-
-=head1 AUTHOR
-
-Devin Austin,,,
-
-=head1 LICENSE
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
-
-1;
+++ /dev/null
-#!/usr/bin/env perl
-
-use FindBin qw/$Bin/;
-
-## because this is a test
-use lib "$Bin/../../../lib";
-use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('Catalyst','CGI');
-
-1;
-
-=head1 NAME
-
-testapp_cgi.pl - Catalyst CGI
-
-=head1 SYNOPSIS
-
-See L<Catalyst::Manual>
-
-=head1 DESCRIPTION
-
-Run a Catalyst application as a cgi script.
-
-=head1 AUTHORS
-
-Catalyst Contributors, see Catalyst.pm
-
-=head1 COPYRIGHT
-
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
+++ /dev/null
-#!/usr/bin/env perl
-
-use FindBin qw/$Bin/;
-
-## because this is a test
-use lib "$Bin/../../../lib";
-use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('TestApp','Create');
-
-
-1;
-
-=head1 NAME
-
-testapp_create.pl - Create a new Catalyst Component
-
-=head1 SYNOPSIS
-
-testapp_create.pl [options] model|view|controller name [helper] [options]
-
- Options:
- -force don't create a .new file where a file to be created exists
- -mechanize use Test::WWW::Mechanize::Catalyst for tests if available
- -help display this help and exits
-
- Examples:
- testapp_create.pl controller My::Controller
- testapp_create.pl -mechanize controller My::Controller
- testapp_create.pl view My::View
- testapp_create.pl view MyView TT
- testapp_create.pl view TT TT
- testapp_create.pl model My::Model
- testapp_create.pl model SomeDB DBIC::Schema MyApp::Schema create=dynamic\
- dbi:SQLite:/tmp/my.db
- testapp_create.pl model AnotherDB DBIC::Schema MyApp::Schema create=static\
- dbi:Pg:dbname=foo root 4321
-
- See also:
- perldoc Catalyst::Manual
- perldoc Catalyst::Manual::Intro
-
-=head1 DESCRIPTION
-
-Create a new Catalyst Component.
-
-Existing component files are not overwritten. If any of the component files
-to be created already exist the file will be written with a '.new' suffix.
-This behavior can be suppressed with the C<-force> option.
-
-=head1 AUTHORS
-
-Catalyst Contributors, see Catalyst.pm
-
-=head1 COPYRIGHT
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
+++ /dev/null
-#!/usr/bin/env perl
-
-use FindBin qw/$Bin/;
-
-## because this is a test
-use lib "$Bin/../../../lib";
-use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('Catalyst','FastCGI');
-1;
-=head1 NAME
-
-testapp_fastcgi.pl - Catalyst FastCGI
-
-=head1 SYNOPSIS
-
-testapp_fastcgi.pl [options]
-
- Options:
- -? -help display this help and exits
- -l -listen Socket path to listen on
- (defaults to standard input)
- can be HOST:PORT, :PORT or a
- filesystem path
- -n -nproc specify number of processes to keep
- to serve requests (defaults to 1,
- requires -listen)
- -p -pidfile specify filename for pid file
- (requires -listen)
- -d -daemon daemonize (requires -listen)
- -M -manager specify alternate process manager
- (FCGI::ProcManager sub-class)
- or empty string to disable
- -e -keeperr send error messages to STDOUT, not
- to the webserver
-
-=head1 DESCRIPTION
-
-Run a Catalyst application as fastcgi.
-
-=head1 AUTHORS
-
-Catalyst Contributors, see Catalyst.pm
-
-=head1 COPYRIGHT
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
+++ /dev/null
-#!/usr/bin/env perl
-
-use FindBin qw/$Bin/;
-BEGIN {
- $ENV{CATALYST_ENGINE} ||= 'HTTP';
- $ENV{CATALYST_SCRIPT_GEN} = 31;
- require Catalyst::Engine::HTTP;
-}
-
-## because this is a test
-use lib "$Bin/../../../lib";
-use Catalyst::ScriptRunner -run 'TestApp' 'Server';
-
+++ /dev/null
-#!/usr/bin/env perl
-use FindBin qw/$Bin/;
-
-## because this is a test
-use lib "$Bin/../../../lib";
-use Catalyst::ScriptRunner;
-Catalyst::ScriptRunner->run('Catalyst','Test');
-
-1;
-
-=head1 NAME
-
-testapp_test.pl - Catalyst Test
-
-=head1 SYNOPSIS
-
-testapp_test.pl [options] uri
-
- Options:
- -help display this help and exits
-
- Examples:
- testapp_test.pl http://localhost/some_action
- testapp_test.pl /some_action
-
- See also:
- perldoc Catalyst::Manual
- perldoc Catalyst::Manual::Intro
-
-=head1 DESCRIPTION
-
-Run a Catalyst action from the command line.
-
-=head1 AUTHORS
-
-Catalyst Contributors, see Catalyst.pm
-
-=head1 COPYRIGHT
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
+++ /dev/null
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use Test::More tests => 2;
-
-BEGIN { use_ok 'Catalyst::Test', '' }
-
-ok( request('/')->is_success, 'Request should succeed' );
+++ /dev/null
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use Test::More;
-
-eval "use Test::Pod 1.14";
-plan skip_all => 'Test::Pod 1.14 required' if $@;
-plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
-
-all_pod_files_ok();
+++ /dev/null
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use Test::More;
-
-eval "use Test::Pod::Coverage 1.04";
-plan skip_all => 'Test::Pod::Coverage 1.04 required' if $@;
-plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
-
-all_pod_coverage_ok();
+++ /dev/null
-# rename this file to TestApp.yml and put a ':' in front of 'name' if
-# you want to use YAML like in old versions of Catalyst
-name TestApp