Re: entering text within a file

[JupiterHost.Net]

[EMAIL PROTECTED] wrote:
awesome.... I am making progress.  I used ".bak" instead of ' ' b/c I do 
not want to remove the file after $ ^ I the edit is done.
BUT, 

I do not want to replace the E strings with the eject string instead I 
want to put the eject string in from of the E string and write now it is 
replacing ?
Try this:
while(<>) {
   s/^E?\d{5}/eject\t0,0,0\t\n\1/; # the \1 is what you matched in the 
first half
   print;
}

thanks!
np :)
Lee.M - JupiterHost.Net
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>