Help for this page
DB<5> $c = "The quick brown fox jumps over the lazy dog."; DB<6> print $1 if $c =~ /.+ (\w+) /; lazy DB<7>
DB<8> print $1 if $c =~ /[^ ]+ (\w+) /; quick ... DB<11> print $1 if $c =~ /.+? (\w+) /; quick DB<21>