Help for this page

Select Code to Download

Select or download this

sub isPalindrome {
    $_[0] =~ /(??{quotemeta scalar reverse $_})/i
}
...
sub isAllUpper {
    $_[0] =~ /(??{uc})/
}