{use Filter::Inject $x,$y;} print "after same line (x=$x, y=$y)\n";
print "new line: x=$x, $y\n";