Select Code to Download

{
    local $_ = $str;
    /pattern1/ && /pattern2/;
}

    "8" =~ /^(?=.*\w)(?=.*\d)/;

    "8" =~ /\w/ && "8" =~ /\d/;

    "8" !~ /\w\d/ && "8" !~ /\d\w/;