All versions of VMS files

[Njall]

Greetings,

Heretofore I have used readdir() almost exclusively to walk directories. And until I started using Perl 5.6.1. on VMS recently that was delightfully more than adequate. However, I am applying Perl to a data analysis problem on one of our (it ain't open) VMS systems. And I need to see all of the files in a directory not just the highest versions of the files.

Alas readdir() can't handle that request. However, globbing, as in

while (<*.*;*>) {
    my $file = $_;
    print "$file \n"; # or whatever.
}

does pick up all versions.

Question: Aside from this technique using globing, can someone recommend a better way of getting a list of all versions of files under VMS?

- Njall