Just run you rprogam like this:
Inside the debugger prompt , use the "h" (help) command , using "x" check the values of the variables.perl -d <Your-program-file-name>
Note: You need to FIRST use the "s" command to get the $rec variable initialized.
Here are the results of running your program - it includes answers to your questions:
DB<1> s main::(junk.pl:10): print $rec->{TEXT},"\n", main::(junk.pl:11): $rec->{SEQUENCE}[0],"\n", main::(junk.pl:12): $rec->{LOOKUP}{"dog"},"\n"; DB<1> x $rec -> [Buick] Not an ARRAY reference at (eval 7)[/usr/lib/perl5/5.10.0/perl5db.pl:63 +8] line 2. DB<2> x $rec -> {LOOKUP} -> {cars} 0 'Buick' DB<3> x $rec -> {LOOKUP} [0] Not an ARRAY reference at (eval 9)[/usr/lib/perl5/5.10.0/perl5db.pl:63 +8] line 2. DB<4> x $rec -> {LOOKUP} {dog} 0 'hound' DB<5> q
"You're only given one little spark of madness. You mustn't lose it." - Robin Williams
In reply to Re^3: Learning about Arrays and Hashes - printing pieces of them
by NetWallah
in thread Learning about Arrays and Hashes - printing pieces of them
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |