karthikeyan wrote: > Dear All, > > Hope you are all having a great day. > > I have a problem. I m running a java program through perl like this : > > $cmd = 'java SSLTest'; > > It returns output like this : > > Using ClearCommerce SSL Java API Version: release-3-8-3-17 Shipping: > 10.0 Tax: 0.0 Time - Sat Jun 22 07:28:42 2002 Ref# - 12345678 Appr - > APPROVED Code - 123456 AVSCode - PayServ - Err - Ord# - > 12.45.92.15-1024748922-901932-1575-14 > > when you run the program in the command line mode I would get > something like this so that you don't get confused > > Using ClearCommerce SSL Java API Version: release-3-8-3-17 > > Shipping: 10.0 > Tax: 0.0 > Time - Sat Jun 22 07:28:42 2002 > Ref# - 12345678 > Appr - APPROVED > Code - 123456 > AVSCode - > PayServ - > Err - > Ord# - 12.45.92.15-1024748922-901932-1575-14 > > Now what I want to do here is get each name and value in a separate > separate variable like : > > $Shipping will contain 10.0, $Tax will contain 0.0, $Time will > contain Sat Jun 22 07:28:42 2002 > how do I parse those string and store it in a variable. > > Any help regarding this would be greatly appreciated.
I would split on :- (assuming a line at a time as your fixed example shows). Then use a hash to store the fields. my %hash; foreach (@lines) { my @f = split /\s*[:-]\s*/, $line; $hash{$f[0]} = $f[1]; } I'm assuming you have the newline problem in hand. -- ,-/- __ _ _ $Bill Luebkert ICQ=162126130 (_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED] / ) /--< o // // http://dbecoll.tripod.com/ (Free site for Perl) -/-' /___/_<_</_</_ Castle of Medieval Myth & Magic http://www.todbe.com/ _______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs