I can't get your code to run, and I don't think it's because I'm on a Windows system (but I could be wrong):
C:\Steve\Dev\PerlMonks\P-2013-10-30@1354-BaseDir>basedir.pl Global symbol "$lastdirectoryname" requires explicit package name at C:\Steve\Dev\PerlMonks\P-2013-10-30@1354-BaseDir\basedir.pl line 22. Execution of C:\Steve\Dev\PerlMonks\P-2013-10-30@1354-BaseDir\basedir. +pl aborted due to compilation errors.
Are you trying to extract the last directory name out of a full pathname? Example:
my $pathName = "/usr/tmp/booger/test.dat";
my $baseName = ExtractLastDir($pathName);
print "Result is $baseName\n";
And you would expect:
Result is booger
Is that your goal?
In reply to Re: I humbly ask for your help with parsing
by marinersk
in thread I humbly ask for your help with parsing
by WxResearcher
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |