if (-e <$upload_dir/$filename2>) { my $inc; # incrementor for($inc = 1; -e <$upload_dir/$filename2 . "~" . $inc>; $inc++) { # Check for previous incremented filenames } $filename2 = $filename2 . "~" . $inc; }