my $subdir = dir($home)->subdir($append);
for ( split '/', $name ) { $home = dir($home)->parent }
if ( $home =~ /blib$/ ) { $home = dir($home)->parent }
- elsif ( !-f file( $home, 'Build.PL' ) ) { $home = $subdir }
+ elsif ( !-f file( $home, 'Makefile.PL' ) ) { $home = $subdir }
if ( $caller->debug ) {
$home
Andy Grundman, Andrew Ford, Andrew Ruthven, Autrijus Tang, Christian Hansen,
Christopher Hicks, Dan Sully, Danijel Milicevic, David Naughton,
-Gary Ashton Jones, Jesse Sheidlower, Johan Lindstrom, Leon Brocard,
+Gary Ashton Jones, Jesse Sheidlower, Jody Belka, Johan Lindstrom, Leon Brocard,
Marcus Ramberg, Tatsuhiko Miyagawa and all the others who've helped.
=head1 LICENSE
If you're tired of removing and adding this all the time, you
can easily add a condition. For example:
- die "Testing" if $c->param->{dump_info};
+ die "Testing" if $c->params->{dump_info};
=head2 Disable statistics