X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=script%2Fcatalyst.pl;h=34a6f94f022d090be1e22590238822e35db8162d;hb=baf6a3dbf99be93d8e8bd9b986a95ad1d81a61ca;hp=3edd12205dc67488fdf748fbb2f56974896eea83;hpb=b1882228082cf4c6c231cacf16b54911b46fc22b;p=catagits%2FCatalyst-Runtime.git diff --git a/script/catalyst.pl b/script/catalyst.pl index 3edd122..34a6f94 100755 --- a/script/catalyst.pl +++ b/script/catalyst.pl @@ -3,7 +3,8 @@ use strict; use Getopt::Long; use Pod::Usage; -use Catalyst::Helper; +eval 'use Catalyst::Helper "1.0";'; +die "Please install Catalyst::Helper!\n" if $@; my $force = 0; my $help = 0; @@ -21,12 +22,14 @@ GetOptions( pod2usage(1) if ( $help || !$ARGV[0] ); -my $helper = Catalyst::Helper->new( { - '.newfiles' => !$force, - 'makefile' => $makefile, - 'scripts' => $scripts, - 'short' => $short, -} ); +my $helper = Catalyst::Helper->new( + { + '.newfiles' => !$force, + 'makefile' => $makefile, + 'scripts' => $scripts, + 'short' => $short, + } +); pod2usage(1) unless $helper->mk_app( $ARGV[0] ); 1; @@ -40,14 +43,19 @@ catalyst - Bootstrap a Catalyst application catalyst.pl [options] application-name +'catalyst.pl' creates a skeleton for a new application, and allows you to +upgrade the skeleton of your old application. + Options: -force don't create a .new file where a file to be created exists - -help display this help and exits - -makefile update Makefile.PL only - -scripts update helper scripts only - -short use short types, like C instead of Controller... + -help display this help and exit + -makefile only update Makefile.PL + -scripts only update helper scripts + -short use short names, M/V/C instead of Model/View/Controller. + + application-name must be a valid Perl module name and can include "::", + which will be converted to '-' in the project name. - application-name must be a valid Perl module name and can include "::" Examples: catalyst.pl My::App