perl -ne'$.-4or print,last'