>
> replace all of this:
>
>
>> foreach my $hr ( sort keys %{ $href->{$cell}} ) {
>> # print "\t$hr";
>> foreach my $count ( sort keys %{ $href->{$cell}->{$hr}} ) { #<-- line
>> 48
>> print "\t$count";
>> }
>> }
>
>
> ...with this:
>
>
> foreach my $hr ( sort keys %{ $href->{$cell}} ) {
> print "\t$hr $href->{$cell}{$hr}";
> }
>
> and see if it fixes your problem. Here is the output. If it is not what you
> desire the output to be, just say so. If it is, let us know. Once we get it
> sorted, I'll try to explain why it was breaking :)
>
> Output:
>
> 149: 00 1 01 2 02 2 03 2 04 2 05 1 06 1
> 077: 00 ND 01 ND 02 ND 03 ND 04 ND 05 ND 06 ND
>
> Steve
That works perfectly! Thank you.
Please explain where mine was breaking.
Thank you,
Chris
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/