[-Perl::Critic::Policy::Subroutines::RequireArgUnpacking] [-Perl::Critic::Policy::RegularExpressions::RequireExtendedFormatting] [-Perl::Critic::Policy::ValuesAndExpressions::ProhibitMismatchedOperators]