>perl -we"@hierarchy = qw(EEBL::League::Schedule); () = sort { $a->isa($b) ? -1 : $b->isa($a) ? +1 : 0 } @hierarchy;"

>perl -we"@hierarchy = qw(EEBL::Team EEBL EEBL::Config); () = sort { $a->isa($b) ? -1 : $b->isa($a) ? +1 : 0 } @hierarchy;"

>

##</code><code>##

>perl -we"() = sort { die } 1"

>perl -we"() = sort { die } 1,2"
Died at -e line 1.

>