perl -ne 'print if $.=/pattern/?1:2..10'