if ($input{'file'} !~ /[^a-z0-9\.]/ && $input{'file'} !~ /\.\./) { #CODE TO WORK IT ALL OUT }