my $x = "hello to\nyou";
    if ($x =~ /^h.*o$/) {say "no match"}
    if ($x =~ /^h.*o$/m) {say "matches now"}