At 08:33 12.12.01 -0600, [EMAIL PROTECTED] wrote:
>Use index to find '=>' and then just take the data from that index to the
>end of the line, or length of the line - index (substr)
or you can do this:
while(<DATA>){
if(/.+\=\>\s+(.+)/){
print "$1\n";
}
}
__END__
1.3.6.1.4.1.9.10.19.1.3.1.1.8.100437591.0 => 16 hours, 03:58.75
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105223983.0 => 2 hours, 46:14.83
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105297783.0 => 2 hours, 33:56.83
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105304518.0 => 2 hours, 32:49.48
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105538136.0 => 1 hour, 53:53.30
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105749311.0 => 1 hour, 18:41.55
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105841716.0 => 1 hour, 03:17.50
1.3.6.1.4.1.9.10.19.1.3.1.1.8.105850396.0 => 1 hour, 01:50.70
a.
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin