m/perl/i (Update: See https://perldoc.pl/perlre#Modifiers.)
Give a man a fish: <%-{-{-{-<
In reply to Re: mixed case with match by AnomalousMonk in thread mixed case with match by catfish1116