Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
    my $basename = ( split m{\\}, $path )[ -1 ];
    print qq{$path\n     $basename\n};
}
  2. or download this
    \\172.20.13.49\backup\rbgmst02_dd2\stu1\CPOSTA_1221170039_C1_F1
     CPOSTA_1221170039_C1_F1
\\172.20.13.49\backup\rbgmst02_dd2\New Folder\Space File
     Space File