Select Code to Download

 2:24 >perl -wE "for (qw[cat catastrophe]) { say qq[$_: matches] if /c
+at/; }"
cat: matches
...
cat: matches

 2:26 >