PathTools Perl module (Cwd, File::Spec)