Help for this page
print "$_->[0]<BR>$_->[1]<BR>$_->[2]<BR>" foreach (sort {$a->[1] cmp $b->[1]} @ODB);