hi I have some questions:
1-How can I get in a variable the full path of the current diretory in a
simple script?
Are the anything like "getdir" or or something like that?
2-In perl/Tk are how can i open a window that shows where folder i want to
work to rename all files in this folder for example.
i know how to show a window to open or save a file but i don't know how
to show a windows that only get the dir variable.
3-I have a script in Perl/tk and there is a notebook tab, but I can't
charge da background color:
.....................................................................................................................................
use Tk;
my $mw = MainWindow -> new(-title => 'UPLA.', -bg =>'blue' ); # BG function
don't work
$mw->maxsize(362,435);
$mw->minsize(362,435);
$pogtab = $mw->NoteBook(-background => 'black', -foreground => 'white',
-borderwidth => 2 , -inactivebackground => '#2415AE', -font => 'arial 9
bold', -relief => 'suken')->pack(-expand=>1,-fill=>'both');
$pogna1 = $pogtab->add('page1', -label=>'page1');
$pogna2 = $pogtab->add('page2', -label => 'page2');
MainLoop;
...............................................................................................................................................
my $mw = MainWindow -> new(-title => 'UPLA.', -bg =>'blue' ); # BG function
work very well
$mw->maxsize(362,435);
$mw->minsize(362,435);
MainLoop;
................................................................................................................................................
how can i fix it?
---------------------------------
-------------------------------------------------------------------
sorry my very very freaking poor beggar english, but with babelfish it will
become so much worst...
sorry too for my first mail that i sant incomplete...
thanks for all!
......................
Ricardo.
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
