Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Tanktalus's scratchpad

by Tanktalus (Canon)
on Jan 21, 2005 at 15:30 UTC ( [id://424004] : scratchpad . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use Data::Dumper;
    use Data::Diver qw(DiveRef DiveVal);
    
    ...
    add_item($hoh, $foo);
    add_item($hoh, $bar);
    print Dumper($hoh);