Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- # Returns absolute path to this module (removing basename)
- 16 sub _absPath {
- 17 my $path = File::Spec->rel2abs(__FILE__);
- 18 my ($volume, $dirs, $file) = File::Spec->splitpath($path);
- 19 return $dirs;
- 20 }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement