use List::MoreUtils 'any';
use IO::File ();
use Carp;
-
+
use namespace::clean -except => 'meta';
=head1 NAME
=head1 VERSION
-Version 0.009
+Version 0.016
=cut
-our $VERSION = '0.009';
+our $VERSION = '0.016';
=head1 SYNOPSIS
=head2 cgi_root_path
-The global URI path prefix for CGIs, defaults to C<cgi-bin/>.
+The global URI path prefix for CGIs, defaults to C<cgi-bin>.
=head2 cgi_dir
=head2 cgi_action
-C<<$self->cgi_action($cgi)>>
+C<< $self->cgi_action($cgi) >>
Takes a path to a CGI from C<root/cgi-bin> such as C<foo/bar.cgi> and returns
the action name it is registered as. See L</DESCRIPTION> for a discussion on how
=head2 cgi_path
-C<<$self->cgi_path($cgi)>>
+C<< $self->cgi_path($cgi) >>
Takes a path to a CGI from C<root/cgi-bin> such as C<foo/bar.cgi> and returns
the public path it should be registered under.
-The default is to prefix with the C<cgi_root_path> config setting, or if not set
-uses C<cgi-bin/$cgi>.
+The default is to prefix with C<$cgi_root_path/>, using the C<cgi_root_path>
+config setting, above.
=cut
=head2 is_perl_cgi
-C<<$self->is_perl_cgi($path)>>
+C<< $self->is_perl_cgi($path) >>
Tries to figure out whether the CGI is Perl or not.
=head2 wrap_perl_cgi
-C<<$self->wrap_perl_cgi($path, $action_name)>>
+C<< $self->wrap_perl_cgi($path, $action_name) >>
Takes the path to a Perl CGI and returns a coderef suitable for passing to
cgi_to_response (from L<Catalyst::Controller::WrapCGI>.)
=head2 wrap_nonperl_cgi
-C<<$self->wrap_nonperl_cgi($path, $action_name)>>
+C<< $self->wrap_nonperl_cgi($path, $action_name) >>
Takes the path to a non-Perl CGI and returns a coderef for executing it.