Lines Matching refs:Spec

75 use File::Spec   ();
581     my ( $vol, undef, undef ) = File::Spec->splitpath( $path );
589     my $path = File::Spec->canonpath( shift( @_ ) );
590     my ( $vol, $dir, undef ) = File::Spec->splitpath( $path );
591     my @dirs = File::Spec->splitdir( $dir );
593     $dir = File::Spec->catdir( @dirs );
594     $dir = File::Spec->catpath( $vol, $dir, undef );
603     my ( undef, undef, $file ) = File::Spec->splitpath( $path );
612     my ( undef, undef, $file ) = File::Spec->splitpath( $path );
622     my ( undef, undef, $file ) = File::Spec->splitpath( $path );
637     my ( $vol, $dirs ) = File::Spec->splitpath( $path, "no_file" );
638     @dirs = ( File::Spec->splitdir( $dirs ), @dirs );
639     $dirs = File::Spec->catdir( @dirs );
640     $path = File::Spec->catpath( $vol, $dirs, $file );
651     my ( $vol, $dirs ) = File::Spec->splitpath( $path, "no_file" );
652     @dirs = ( File::Spec->splitdir( $dirs ), @dirs );
653     $dirs = File::Spec->catdir( @dirs );
654     $path = File::Spec->catpath( $vol, $dirs, "" );
727     my $dirs = ( exists( $opts{ -dirs } ) ? $opts{ -dirs } : [ File::Spec->path() ] );
743             my $path = File::Spec->catfile( $dir, $file . $ext );
794     $path = File::Spec->rel2abs( $path, ( defined( $base ) ? $base : $ENV{ PWD } ) );
795     my ( $vol, $dir, $file ) = File::Spec->splitpath( $path );
798     $path = File::Spec->canonpath( File::Spec->catpath( $vol, $dir, $file ) );
814     $path = File::Spec->abs2rel( abs_path( $path ), $base );
846 …          ( my $vol, my $dir, $file ) = File::Spec->splitpath( File::Spec->rel2abs( $orig_path ) );
847             $orig_path = File::Spec->catpath( $vol, $dir );
854             $real_path = File::Spec->catfile( $real_path, $file );
1067     my @entries  = File::Spec->no_upwards( $handle->read() );
1631                 DIR    => File::Spec->tmpdir(),
1661             $temp_name = File::Spec->devnull();