.
>
>my @data=("Days
>Old:143--User:yevala--Element:/vobs/ivr/air.pj/hdrs/irDefines.h"
>);
>foreach(@data)
>{
>my @data1=split(':', $_, 1);
>print "@data1\n";
>}
>
>But i am not getting 143 out of it.

Hello,

How about using regex to extract it?

$ perl -le '
> $str = "Days Old:143--User:yevala--Element:/vobs/ivr/air.pj/hdrs/irDefines.h";
> $str =~ s/Old:\d+/Old:/;
> print $str;'

Days Old:--User:yevala--Element:/vobs/ivr/air.pj/hdrs/irDefines.h

--
Jeff Pang
EMAIL: pangj<at>earthlink.net  AIM: jeffpang

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to