perl -i.orig -ne 'print unless /^lb348,/' test.txt