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