Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: Perl tk - open file and print content

by Anonymous Monk
on Jan 16, 2012 at 12:24 UTC ( #948129=note: print w/replies, xml ) Need Help??


in reply to Perl tk - open file and print content

Well, the classic editor is gedi or gedi-lite

perl -MTk -e " tkinit->TextEdit->pack; MainLoop "
or
perl -MTk -e " tkinit->Scrolled( q/TextEdit/ )->pack; MainLoop "

but its broke :)

update: still broke since 2005 , yuck, Bug #13807 for Tk: Bug in getOpenFile/getSaveFile

http://search.cpan.org/src/SREZIC/Tk-804.030/Tk/TextEdit.pm

http://search.cpan.org/~srezic/Tk-804.030/pod/TextUndo.pod

perl -MTk -e " my $te = tkinit->Scrolled( q/TextUndo/ )->pack; $te->Lo +ad( q/filename/ ); MainLoop "

As usual, there is also example in the widget demo, widget - Demonstration of Perl/Tk widgets

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://948129]
help
Chatterbox?
[Discipulus]: it is probably far from roma.. i hope is not another dramatic event..
[Discipulus]: they say is about 5 richter
Discipulus sadly in italy this can cause severe damages to buildings

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (6)
As of 2017-01-18 09:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (161 votes). Check out past polls.