http://www.perlmonks.org?node_id=541745

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Hello, it seems the initialfile option in getSaveFile is not working. I put in test and was hoping the word would appear in the GUI. Here's the code: 

use Tk;
$mw=MainWindow->new;
my $save = $mw->getSaveFile(-title=>'TEST',-initialfile=>'test');

[download]

Edit: g0n - code tags

Replies are listed 'Best First'.
Re: getSaveFile - Perl Tk
by PodMaster (Abbot) on Apr 07, 2006 at 03:17 UTC
    Works for me.
    perl, v5.8.4 built for MSWin32-x86-multi-thread
    Tk 804.027

    MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
    I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
    ** The third rule of perl club is a statement of fact: pod is sexy.

[reply]
Re: getSaveFile - Perl Tk
by zentara (Archbishop) on Apr 07, 2006 at 12:06 UTC
    Works for me too under linux. What versions of Perl and Tk are you using? Maybe it's time to upgrade.
    I'm not really a human, but I play one on earth. flash japh
[reply]
Re: getSaveFile - Perl Tk
by Anonymous Monk on Oct 04, 2013 at 08:56 UTC
    hello , its not working for me...i am not able to see the saved file in my system...
[reply]

      hello , its not working for me...i am not able to see the saved file in my system...

      The posted code doesn't create a file, so what are you talking about?

[reply]

Back to Seekers of Perl Wisdom