use warnings;
use Class::C3;
-use URI::Escape;
use File::Slurp 'slurp';
use File::Find::Rule ();
use Catalyst::Exception ();
use Symbol 'gensym';
use List::MoreUtils 'any';
use IO::File ();
+use namespace::clean -except => 'meta';
use parent 'Catalyst::Controller::WrapCGI';
=head1 VERSION
-Version 0.003
+Version 0.004
=cut
-our $VERSION = '0.003';
+our $VERSION = '0.004';
=head1 SYNOPSIS
}
$self->next::method($app, @_);
+
+# Tell Static::Simple to ignore the cgi-bin dir.
+ if (!any{ $_ eq 'cgi-bin' } @{ $app->config->{static}{ignore_dirs}||[] }) {
+ push @{ $app->config->{static}{ignore_dirs} }, 'cgi-bin';
+ }
}
=head1 METHODS