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
=head1 SYNOPSIS
-See L<Catalyst>.
+ myapp_test.pl [options] /path
+
+ Options:
+ -h --help display this help and exits
=head1 DESCRIPTION
-FIXME
+Script to perform a test hit against your application and display the output.
+
+=head1 SEE ALSO
+
+L<Catalyst::ScriptRunner>
=head1 AUTHORS