Why not just split on your separator ' => ' and return the 2nd value?
$var = '1.3.6.1.4.1.9.10.19.1.3.1.1.8.100437591.0 => 16 hours, 03:58.75' ; (undef, $value) = split(/=\> /, $var) ; print "value\n" ; Ed Ed DeBus Noor Group Senior Tools/Application Engineer US +1 202 6256690 x31 [EMAIL PROTECTED] -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of [EMAIL PROTECTED] Sent: Wednesday, December 12, 2001 9:33 AM To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Subject: RE: simple question 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) Stanley G. Martin Midwest Consulting Group Sprint Platform & Strategy Mgmt 913.315.3133 [EMAIL PROTECTED] -----Original Message----- From: MSingle [mailto:[EMAIL PROTECTED]] Sent: Wednesday, December 12, 2001 8:16 AM To: perl-win32-admin; perl-ntadmins Cc: MSingle 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
