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