Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"my $s = 'Fu Feet Fie Foe Fum';
...

highest capture group is 4, captures are
$1 eq 'Fu'  $2 eq 'Feet'  $3 eq 'Fie'  $4 eq 'Foe'