if ($omething) {
   # do stuff
} else {
   print "There was no match!\n"; # or some other error 
}