X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FScript%2FTest.pm;h=4209d62948a190cd232b316e0e9f3a4b274ed19f;hb=d0cacee71a316290bc01f0e12681c16bdc1e84e2;hp=a05b18254d4c726da4e5057b03e5a198cf13875a;hpb=3dcfb4c8551d0c36477d7f62d87c5cb022dd0c27;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Script/Test.pm b/lib/Catalyst/Script/Test.pm index a05b182..4209d62 100644 --- a/lib/Catalyst/Script/Test.pm +++ b/lib/Catalyst/Script/Test.pm @@ -10,11 +10,14 @@ sub run { Catalyst::Test->import($self->application_name); - print request($ARGV[0])->content . "\n"; + foreach my $arg (@{ $self->ARGV }) { + print request($arg)->content . "\n"; + } } __PACKAGE__->meta->make_immutable; +1; =head1 NAME @@ -31,6 +34,10 @@ Catalyst::Script::Test - Test Catalyst application on the command line Script to perform a test hit against your application and display the output. +=head1 SEE ALSO + +L + =head1 AUTHORS Catalyst Contributors, see Catalyst.pm