sub parse{${$_[0]}=~/\Gfoo/gc or die}
parse \(''.'foo'.$_) for 1..2