wanted => sub {
push @files, $_
if -f $_
- && !/Squirrel|MouseX|\.sw[po]$/
+ && !/Squirrel/
&& !/\bouse/
+ && !/\.sw[po]$/
},
no_chdir => 1,
}, 'lib');
$contents =~ s/__END__\b.*//s; # remove documentation
$contents =~ s/1;\n*$//; # remove success indicator
- $contents =~ s/^.*\n//; # remove shebang
$contents =~ s/^use Mouse\S*\s*\n//mg; # we're already loading everything
$contents =~ s/^use (Mouse\S*)\s*(.+);/BEGIN { $1->import($2) }/mg;