Can't call method "as_text" on an undefined value at C:\..\perl\treebuilder.pl line 29.

##</code><code>##

$rec{$tds[2]->as_text}  = $tds[3]->as_text;

##</code><code>##

$rec{note}  = $fields[6]->as_text; #put nested tables in this one.
$rec{group} = $fields[0]->as_text;
$rec{type}  = $fields[1]->as_text;