Honestly the ones I probably use more than any other? =~ and !~
if ($text =~ /error/) { print "Found error\n"; }
if ($text !~ /error/) { print "No error found\n"; }
It's just fun and fast to slice and dice text this way.