Skip Menu |
 

This queue is for tickets about the Config-Auto CPAN distribution.

Report information
The Basics
Id: 32927
Status: resolved
Priority: 0/
Queue: Config-Auto

People
Owner: Nobody in particular
Requestors: seth.viebrock [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.20
Fixed in: (no value)



Subject: Hash key being assigned to $1 instead of $_
Diff attached.
Subject: diff.txt
Download diff.txt
text/plain 882b
248d247 < #$c is the config hash we're building: 250d248 < 255d252 < #If there are equal signs in @v... 257,258d253 < < #...iterate through each array element in @v and set each element to $_ : 261,272c256,257 < #If the array element has an equal sign in it... < if (/(.*)=(.*)/) < { < #Set the subkey and subvalue to $1 and $2 pattern matches: < ($subkey, $subvalue) = ($1,$2); < } < #...otherwise, if the array element does not contain an equals sign: < else < { < #Set the subkey to the array element ($_) and the subvalue to "1": < $subkey = $_; $subvalue = 1; < } --- > if (/(.*)=(.*)/) { ($subkey, $subvalue) = ($1,$2); } > else { $subkey = $1; $subvalue = 1; }
On Mon Feb 04 22:53:19 2008, seth.viebrock wrote: Show quoted text
> Diff attached.
Thanks, applied.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.