( uid_194 | 2010. 08. 30., h – 17:43 )

while (<$dir/$ff>) { next if /\./; print; }

Valoszinuleg van jobb, de a semminel jobb ez is ;)