if(-e $fname) { print 'File exists!' }
else { print 'File not found' }