Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...
else {
    print 'Invalid path:  ', $dubiousPath;
}

Select or download this

P:\test>perl -T junk.pl8 .
Absolute path: P:/test
...

P:\test>perl -T junk.pl8 ./used/././t/../.././..
Invalid path:  ./used/././t/../.././..