Normally you'd use one of the IO:: objects since now it's 100% nicer to work with. Or at least I'd much prefer to pass around an IO::something object than have to work with typeglobs n' stuff. I gather that this is more of a perl4-ism and justisn't needed anymore (though obviously it still works). The IO::something objects are convenient since at root they're really just typeglob references so the various functions like open/close/read opendir/readdir/closedir will just read the reference and it still works at full speed. Yay!

For extra credit try this:

use Devel::Peek;
opendir DIR, '.' or die $1;
Dump(*DIR); # The IO slot has the dirhandle (I guess)
[download]