How can I extract the text before the first occurrence of dot (.) or single space from the first field.
This is my file
LB1571 5TH .W43 1993|text1|text1| FICT. V.12|text2|text2| FICT.|text3|text3| HQ806 .B35 1995|text4|text4| G530.T6B4941988Q|text5|text5| MPCD11 .B42 P27|text6|text6| ..... C |textn|textn
This is the output that I need
LB1571|tex1|text1| FICT|text2|text2| FICT|text3|text3| HQ806|text4|text4| G530|text5|text5 MPCD11|text6|text6 ..... C |textn|textn
Thanks, Zary Necheva
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>