Better check for t/ directory in Perl handler

[craigberry]

The simple pattern match doesn't work on VMS, where the directory name will be something like [.t.sample-tests]. So use the available facilities to parse the directories.