How to ignore the single and double dot entries in Perl's readdir?

Question

Following up from here: Perl Imgsize not working in loop? I have another question - how do I not let perl list the single and double dot entries when it reads the files in a dir

Answer 1

To test string you have to use eq:

if($file eq "." || $file eq ".."){ next;}

or:

next if $file =~ /^\.\.?$/;