open FILE,'/Users/j/Desktop/test.log'; while () { chomp; #check for duplicate file if ($_ =~ m/appending/) { print "Looks like the data you entered is already on file\n"; close (FILE); } else { print "hey hey success\n"; close (FILE); &append; } }