On 4/27/05, [EMAIL PROTECTED] wrote: > Please help me find the regexp to replace -o-b- - - -f > thank you! >
Replace it with *what*? > s/sg//, s/\- {1,}(\w{1,})//,print +(split)[5,6,7], if (m/f01(\d+)/gi ) > What does this code have to do with your question? > my $_ has these lines in it: > > -o-b- - - -f > F01045 Meaningless question subject, obscure question, some strange code and data thrown in - it's like you don't *want* to get an answer ;-) -- Offer Kaye -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>