in reply to Perl/TK trees always start open
$tree->hide( entry => 'entry.path' ); $tree->autosetmode; [download]
should work.