Następujący stąd:Perl Imgsize nie działa w pętli? Mam jeszcze jedno pytanie - jak nie mogę pozwolić perlowi na wpisywanie pojedynczych i podwójnych wpisów, gdy odczytuje pliki w katalogu?

Tak jak w powyższym pytaniu, moje wyjście do pętli while (while ($file = readdir($dh))) to coś takiego:

.
..
file1.jpg
file2.jpg 
file3.jpg 
file4.jpg 
file5.jpg 

I to stwarza problemy, ponieważ mam gdzieś licznik, który liczy moje pliki. I. i.. nie licz jako plików, więc mój licznik podaje większą liczbę plików w moich katalogach niż w rzeczywistości.

dodałemif($file == "." || $file == ".."){ continue;} iif ($file ~ /^\./ or $file ~ /^\.\./) {continue;} i różne warianty tego na początku pętli while ... ale wciąż otrzymuję przerwanie "z powodu błędów kompilacji".

Jak zdobyć pozycje pojedynczej i podwójnej kropki?