Help for this page
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] );
# Windows "\\photorepos\\Perl\\Mother\\WorkLoad" ... Is Relative Volume: Dir List: ["C:\\", "photorepos", "Perl", "Mother", "WorkLoad"]