Select Code to Download

$_ = "fofofo";
/((?:fo)+)(?{ say "[$-[1], $+[1], $1]" })(*FAIL)/;
...
[2, 6, fofo]
[2, 4, fo]
[4, 6, fo]