Help for this page

Select Code to Download

Select or download this

$_='axxbcaxbagaxbacba';
for (m/a(.*?)b/g) {
    print "$a\n";
}

Select or download this

$_='axxbcaxbagaxbacba';
foreach my $a (m/a(.*?)b/g) {
    print "$a\n";
}