in reply to Trouble traversing binary tree (was: recursion)

$head = shift;

[download]
should be 
my $head = shift;

[download]
which use strict would have caught, likely.

-- Randal L. Schwartz, Perl hacker

In Section Seekers of Perl Wisdom