in reply to pretrunkulation?
Basically TINWTDI (there is no way...) using the method you have asked for.
For discussion of what you can do: perldoc -q 'delete a line'.
YuckFoo