$file !~ m/^[\w-]+(\.[\w-]+)*$/