$source = "/kmtest/cci022_031902.txt: No such file or directory";

if ($source =~ /'no such file'/i) {
	print "Found it \n";
}