in reply to Tk::DirTree, TK::DirSelect

The following works for me:

use warnings; use strict; use Tk::DirSelect; my $main = MainWindow->new (); my $ds = $main->DirSelect(); my $dir = $ds->Show('.'); print $dir;

Perl is Huffman encoded by design.

Replies are listed 'Best First'.
Re^2: Tk::DirTree, TK::DirSelect
by Real Perl (Beadle) on Aug 08, 2005 at 04:12 UTC
    Thank you so much! I think it is high time I take a break -- I can't think straight!