# does it contain text?
if ($i =~ /A-HJ-Za-z/)

##</code><code>##

print STDERR "Just drag your datafiles in turn onto the program icon,\n";