App-SeismicUnixGui

 view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

	sub MY::libscan   {
           my ($self, $file) = @_;
           # Exclude any file or directory that starts with a dot
           # when it's part of a path component.
           # This regex checks for a path component starting with a dot.
           if ( $file =~ m{^/.[^/]+} ) {

           return 0;

           } else {
              return $self->SUPER::libscan($file);
            #return 1;
	   }

	}

# post-installation required scripts
#
	
sub MY::postamble {
	return <<'END';



( run in 1.192 second using v1.01-cache-2.11-cpan-feb199c6f72 )