Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: x @DB::args

by repellent (Priest)
on Mar 15, 2012 at 05:50 UTC ( #959720=note: print w/ replies, xml ) Need Help??

in reply to x @DB::args

Seems fine to me:

bash-3.2$ cat #!/usr/bin/perl sub foo { print "inside foo\n"; } foo( [1..3], {a => 4, b => 5}, 'a' x 6, 789, ); bash-3.2$ perl -d Loading DB routines from version 1.3 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::( foo( main::( [1..3], main::( {a => 4, b => 5}, main::( 'a' x 6, main::( 789, main::( ); DB<1> s main::foo( print "inside foo\n"; DB<1> T . = main::foo(ref(ARRAY), ref(HASH), 'aaaaaa', 789) called from file `' line 7 DB<1> x @DB::args 0 ARRAY(0x100812fe0) 0 1 1 2 2 3 1 HASH(0x10097d318) 'a' => 4 'b' => 5 2 'aaaaaa' 3 789 DB<2> q

Comment on Re: x @DB::args
Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (9)
As of 2015-12-01 10:17 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (798 votes), past polls