${$partition_h{a}}{full_tabname}
Do you really mean ${$partition_h{a}}{full_tabname} and not ${$partition_h{$a}}{full_tabname} (a vice $a)?
Update: It is possible (though usually very tedious) to put debug statements into a sort block as long as the comparison is the last expression evaluated:
(Update: Changed example code to use Data::Dump::dd() instead of print and to include an undef element in the list to be sorted.)c:\@Work\Perl\monks>perl -wMstrict -e "use Data::Dump qw(dd); ;; my @sorted = sort { dd $a, $b; $a cmp $b; } (qw(d a c e b), undef); dd \@sorted; " ("d", "a") ("c", "e") ("b", undef) Use of uninitialized value in string comparison (cmp) at -e line 1. ("a", "c") ("c", "d") ("d", "e") ("a", undef) Use of uninitialized value in string comparison (cmp) at -e line 1. ("a", "b") ("c", "b") [undef, "a", "b", "c", "d", "e"]
Give a man a fish: <%-{-{-{-<
In reply to Re: Debug a sort block
by AnomalousMonk
in thread Debug a sort block
by rpaskudniak
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |