Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: using Tk::FileSelect

by strider corinth (Friar)
on Nov 05, 2002 at 16:22 UTC ( [id://210495]=note: print w/replies, xml ) Need Help??


in reply to using Tk::FileSelect

The problem looks like it stems from the way Tk::FileSelect handles file masks, and its selection verifying feature. You aren't allowed (by default) to pick directories, just files. So when you select /usr/local/*, you're seeing odd results because you're not selecting the directory itself, but all of the files within it.

If you add $fs->configure( -verify => [ '-e' ] ); after you create your selection dialog, it will switch the verification flag from '!-d' (don't select directories) to '-e' (select anything that exists). My test program returns just the directory name when that line is inserted.

For more info, check the CPAN docs for Tk::FileSelect.
--

Love justice; desire mercy.

Replies are listed 'Best First'.
Re: Re: using Tk::FileSelect
by wmoran (Initiate) on Nov 05, 2002 at 16:49 UTC
    That does it, thanks for the reply.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://210495]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having an uproarious good time at the Monastery: (3)
As of 2025-06-21 10:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.