s/ / \n/xi, s/ \n/lave/, s/lave/join 'abe', chop $_, chop $_, chop $_, chop $_;/eimx, s/abe/();/eg, s/p? \n\n/eval $_;/exes;