#!/bin/perl -ni.bak
  print $. < 3 ? () : $. > 3 ? $_ : "new third\n";