Select Code to Download

#!/usr/bin/perl -l

...
closedir $dh;

print for @emptyfiles;

$ ls -l 1 12 123
-rw-r--r--  1 ken  staff  0  8 Jan 03:00 1
-rw-r--r--  1 ken  staff  7  8 Jan 03:00 12
-rw-r--r--  1 ken  staff  0  8 Jan 03:00 123

1
123