Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: x @DB::args

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


in reply to x @DB::args

Seems fine to me:
bash-3.2$ cat t4.pl #!/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 t4.pl Loading DB routines from perl5db.pl version 1.3 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(t4.pl:7): foo( main::(t4.pl:8): [1..3], main::(t4.pl:9): {a => 4, b => 5}, main::(t4.pl:10): 'a' x 6, main::(t4.pl:11): 789, main::(t4.pl:12): ); DB<1> s main::foo(t4.pl:4): print "inside foo\n"; DB<1> T . = main::foo(ref(ARRAY), ref(HASH), 'aaaaaa', 789) called from file ` +t4.pl' 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

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (5)
As of 2024-04-25 16:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found