if ($name ~~ [$t1, $t2]) { ...; } #### use match::smart "match"; if (match $name, [$t1, $t2]) { ...; } #### use match::simple "match"; if (match $name, [$t1, $t2]) { ...; } #### use List::Util "any"; if (any { $name eq $_ } $t1, $t2) { ...; }
## use match::smart "match"; if (match $name, [$t1, $t2]) { ...; } ##
## use match::simple "match"; if (match $name, [$t1, $t2]) { ...; } ##
## use List::Util "any"; if (any { $name eq $_ } $t1, $t2) { ...; }