Select Code to Download

$fc = 'abcdfoofrobnicatebardefforspambazghi'; 

$re2 = qr/(fo.)(.*?)(ba.)/;
...
0{bpart}: bar
1{fpart}: for
1{bpart}: baz