if (($file ne ".") or ($file ne "..")) {

##</code><code>##

unless ( $file eq "." || $file eq ".." ) {

##</code><code>##

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