I always insert this in any Perl script that works with directories:

   $fil = @dir[$i];
   if ($fil =~ /^Icon/)

(Where @dir is set from a READDIR instruction)

>actually,  "Icon\015" (octal, I prefer this) or "Icon\x0D" 
>(hexadecimal) -- but not "Icon\0x0D", that's wrong in Perl -- is a 
>plain file.

Reply via email to