in reply to Re: Checking a path
in thread Checking a path

Note that for more concision the last character of the string can be obtained by: 
substr($TestStrings{$TestPatternKey}, -1)

[download]

In Section Seekers of Perl Wisdom