Help for this page

Select Code to Download


  1. or download this
    use Data::Dumper;
$Data::Dumper::Useqq=1;
...
print $dir->is_absolute ? "Is Absolute\n" : "Is Relative\n";
print "Volume: ", $dir->volume, "\n";
print "Dir List: ",Dumper( [$dir->dir_list] );
  2. or download this
    # Windows
"\\photorepos\\Perl\\Mother\\WorkLoad"
...
Is Relative
Volume: 
Dir List: ["C:\\", "photorepos", "Perl", "Mother", "WorkLoad"]