if($@){ print "Some errors happened...\n\n"; print $@."\n\n"; print "Oh well...\n"; }