Help for this page
use Devel::Peek; Dump($filename);
use strict; use warnings; ... while (defined(my $fn = readdir($dh))) { Dump($fn) if / vu$/; }