perl -e "@l = <>; print 'first : ', $l[0], 'last  : ', $l[$#l];" filename