Re^3: string parsing with split

Here's something that looks a bit closer to the actual string:

Then here's something that may be a bit closer to a working solution for you?

$s = q[platform=linux hpfFamily=hwseries npsFamily=SWseries rackcnt=1 
+SPAs=1 SPUpSPA=6 CPUs=6 shrParts="/part1 /home/part2" maintIface="eth
+2" DEncpSPA=4 nDEncs=4 npsMName="SystemName" portnums="ports=(0 1 2 3
+)" ints=(eth0 eth1)];;

print for split ' (?=\w+=)', $s;;
platform=linux
hpfFamily=hwseries
npsFamily=SWseries
rackcnt=1
SPAs=1
SPUpSPA=6
CPUs=6
shrParts="/part1 /home/part2"
maintIface="eth2"
DEncpSPA=4
nDEncs=4
npsMName="SystemName"
portnums="ports=(0 1 2 3)"
ints=(eth0 eth1)
[download]

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority".

In the absence of evidence, opinion is indistinguishable from prejudice.

Comment on Re^3: string parsing with split Download Code

Replies are listed 'Best First'.
Re^4: string parsing with split by MeatLips (Novice) on Jan 24, 2011 at 22:01 UTC
`@a = split ' (?=\w+=)', $s;;` That was just what I needed! Thank you!	[reply] [d/l]