Binary trees in Perl4
