- or download this
##
## make_node()
...
return $new_node;
}
- or download this
$last_node = new_node('last', undef);
$middle_node = new_node('middle', $last_node);
$first_node = new_node('first', $middle_node);
- or download this
sub traverse_nodes
{
...
}
}
- or download this
print join(' ', traverse_nodes($first_node) ), "\n";