Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^2: Issues with Split

by cipher (Acolyte)
on Jun 14, 2016 at 05:06 UTC ( [id://1165525]=note: print w/replies, xml ) Need Help??


in reply to Re: Issues with Split
in thread Issues with Split

Thanks, I am still trying to get this fixed based on your recommendations. I will update this thread once I make any progress.

Replies are listed 'Best First'.
Re^3: Issues with Split
by graff (Chancellor) on Jun 14, 2016 at 10:34 UTC
    Here is what afoken was talking about -- instead of this: 
        my ($type, $restofstring) = /^type=(\w+) (.+)$/;
    for $restofstring (split) {
        my ($key, $val) = split /=/, $restofstring;
        $hash{$type}{$key} = $val;
    }

    [download]
    you should do this: 
        my ($type, $restofstring) = /^type=(\w+) (.+)$/;
    for $token ( split ' ', $restofstring ) {
        my ($key, $val) = split /=/, $token;
        $hash{$type}{$key} = $val;
    }

    [download]
[reply]
[d/l]
[select]
      Thanks a lot, this code works. Appreciate your help.
[reply]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://1165525]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others musing on the Monastery: (4)
As of 2024-04-16 15:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found