Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re^4: regexp list return 5.6 vs 5.8

by Sixtease (Friar)
on Jan 24, 2008 at 09:50 UTC ( [id://663973]=note: print w/replies, xml ) Need Help??


in reply to Re^3: regexp list return 5.6 vs 5.8
in thread regexp list return 5.6 vs 5.8

Wow, so the [[] was not a typo? I thought it was. I still don't understand how it could have got there! What does it print when you use different delimiters? (like print "{", scalar(test('abc')), "}";)

use strict; use warnings; print "Just Another Perl Hacker\n";

Replies are listed 'Best First'.
Re^5: regexp list return 5.6 vs 5.8
by hipowls (Curate) on Jan 24, 2008 at 10:21 UTC

    Strange indeed.

    michael$ perl t.pl {{} {} {123} {123}

      Putting the call inside a @{[ ... ]} construct does something different.

      print "[@{ [ scalar test('abc') ] }]\n"; print "[", scalar test('abc'), "]\n\n"; print "[@{ [ test('abc') ] }]\n"; print "[", test('abc'), "]\n\n"; print "[@{ [ scalar test('123') ] }]\n"; print "[", scalar test('123'), "]\n\n"; print "[@{ [ test('123') ] }]\n"; print "[", test('123'), "]\n"; sub test { my @rv = $_[0] =~ /^([0-9]+)$/; return @rv[ 0 .. $#rv ]; }

      produces

      [ ] [[] [] [] [123] [123] [123] [123]

      Running 5.8.4 on Solaris 9.

      Cheers,

      JohnGG

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://663973]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others scrutinizing the Monastery: (5)
As of 2024-04-18 01:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found