Help for this page
>perl -wMstrict -le "my $min_10 = qr{ (?= .{10}) }xms; ... 1aA%234567 '1aA%234567' valid Terminating on signal SIGINT(2)