Select Code to Download

my $string = " foo bar quz ";
pos($string)=undef;  # just to play it safe
...
}
die "match failed at pos ".pos($string)
    unless pos($string)==length($string);