I think the obvious answer to this question is that you never ask a Perl
group how to parse a string :)

The possibilities are of course endless.


-----Original Message-----
From: Matthew DODKINS [mailto:[EMAIL PROTECTED]]
Sent: Thursday, December 13, 2001 4:13 AM
To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: RE: simple question


Or you could do this :



$string = "1.3.6.1.4.1.9.10.19.1.3.1.1.8.100437591.0 => 16 hours, 03:58.75";

print $string=~/=>(.*)/;







>>> "[EMAIL PROTECTED]" 12/12/01 09:09pm >>>



Try something like the following.  By the end of the day you'll probably

have at least 5 solutions.



my $string = "1.3.6.1.4.1.9.10.19.1.3.1.1.8.100437591.0 => 16 hours,

03:58.75";

my ($a, $tail) = split("=>", $string);

print "beginning: $a\n";

print "tail: $tail\n";





-----Original Message-----

From: Mike Singleton [mailto:[EMAIL PROTECTED]] Sent: Wednesday, December
12, 2001 9:16 AM

To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: simple question





How would I parse this output so that ONLY the value after the => is

returned?







Output:



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











===



Mike Singleton CCNA, CNE, MCSE



Network Analyst



(253) 272-1916  x1259



(253) 405-1968 (cellular)



[EMAIL PROTECTED] DaVita Inc.







_______________________________________________

Perl-Win32-Admin mailing list

[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
_______________________________________________

Perl-Win32-Admin mailing list

[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin

_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin

Reply via email to