http://www.perlmonks.org?node_id=153

*** The previous line contains the naughty word "$&".\n
if /(ibm|apple|awk)/; # :-)
--Larry Wall in the perl man page

Next Quote