Some more work on IO::Dir