Select Code to Download

defined $self->[ARRAY][$index] ? $self->[ARRAY][$index] : undef;

What exactly is the purpose of this line? Isnt the conditional totally
+ redundant?

#!/usr/bin/perl -w
package Tie::SortedHash;
...
This module is a designed to retrieve hash keys in a pre-defined sorte
+d order.
It is often frustrating to have a hash return elements in a seemingly 
+random order 
when using C<keys()>, C<values()> or C<each()>.