Next Tricks of the Wizards 71

Tied Filehandles

        use Dir;
        my $dh = Dir->open(".") or die ...;
        while (<$dh>) {
          # Do something with the filename in $_
        }
        close $dh;


Next Copyright © 2003 M. J. Dominus