Home | History | Annotate | Download | only in misc

Lines Matching refs:fileparse

19 use File::Basename qw( fileparse );
398 use File::Basename qw( fileparse );
780 use File::Basename qw( fileparse );
1006 use File::Basename qw( fileparse );
1653         ($base, $dir, undef) = fileparse ($qunkref->filename);
1806 use File::Basename qw( fileparse );
1851     @self{qw(filename dir_key)} = fileparse($path);
1909 use File::Basename qw( fileparse );
2207     ($base, undef, undef) = fileparse($path);
2506   # do the path separators slope?  Can we use fileparse as per the local
2511   my ($dir1, $dir2) = map +(fileparse($_))[1], $path1, $path2;