List of recent files for getOpenFile (perl Tk)

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

I use an application which when opening a file gives a window which has an button that give a list of recently opened files.
I use getOpenFile with Perl /Tk to provide a file opening fnction.
Is there a way of adding the ‘recent file list’ button that I use on that other, none Perl based, application?

Comment on List of recent files for getOpenFile (perl Tk)

Replies are listed 'Best First'.
Re: List of recent files for getOpenFile (perl Tk) by choroba (Cardinal) on Dec 03, 2017 at 22:09 UTC
As far as I know, there's no such widget provided in Tk; but you can easily create it yourself: Just keep a list of recently opened files, add each opened file to it, and probably make it persistent by saving the list into a file. Don't forget to store the full path, not just the file name. ($q=q:Sq=~/;[c](.)(.)/;chr(-\|\|-\|5+lengthSq)`"S\|oS2"`map{chr \|+ord }map{substrSq`S_+\|`\|}3E\|-\|`7**2-3:)=~y+S\|`+$1,++print+eval$q,q,a, [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re: List of recent files for getOpenFile (perl Tk)
by choroba (Cardinal) on Dec 03, 2017 at 22:09 UTC

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

[reply]
[d/l]