1use ExtUtils::MakeMaker; 2 3WriteMakefile( 4 'NAME' => 'Class::Factory::Util', 5 'VERSION_FROM' => 'lib/Class/Factory/Util.pm', 6); 7 8package MY; 9 10sub libscan 11{ 12 my $self = shift; 13 my $file = shift; 14 15 return $file =~ /svn/ ? 0 : $self->SUPER::libscan($file); 16} 17