develooper Front page | perl.perl5.porters | Postings from September 2012

[perl #76660] given (@a) when (/REGEX/)

Thread Next
From:
Father Chrysostomos via RT
Date:
September 11, 2012 22:34
Subject:
[perl #76660] given (@a) when (/REGEX/)
Message ID:
rt-3.6.HEAD-11172-1347428054-401.76660-15-0@perl.org
On Thu Jul 22 09:14:47 2010, ikegami@adaelis.com wrote:
> given (@a) {
>     when (/abc/  ) { say '/abc/';   continue; }  # Doesn't match!!!
>     when (qr/abc/) { say 'qr/abc/'; continue; }  # Matches
>     when (/ARRAY/) { say '/ARRAY/'; continue; }  # Matches!!!
> }

Under the new scheme, given($array_ref) won’t be particularly
meaningful, will it?

So should given(@a) continue to turn automagically into given(\@a)?

-- 

Father Chrysostomos


---
via perlbug:  queue: perl5 status: open
https://rt.perl.org:443/rt3/Ticket/Display.html?id=76660

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About