Help for this page

Select Code to Download


  1. or download this
      #!/bin/perl -ni.bak
      print $. < 3 ? () : $. > 3 ? $_ : "new third\n";
    
  2. or download this
      #!/bin/perl -ni.bak
        print
    ...
        scalar <>; scalar <>; scalar <>;
        print "This text replaces the third line.\n";
      } {