Help for this page

Select Code to Download


  1. or download this
    {use Filter::Inject $x,$y;} print "after same line (x=$x, y=$y)\n";
print "new line: x=$x, $y\n";
  2. or download this
    BEGIN {use Filter::Inject $x,$y;} print "after same line (x=$x, y=$y)\
+n";
print "new line: x=$x, $y\n";
  3. or download this
    BEGIN {use Filter::Inject $x,$y;};;; print "after same line (x=$x, y=$
+y)\n";
print "new line: x=$x, $y\n";