Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

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?

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

How do I use this?Last hourOther CB clients
Other Users?
Others exploiting the Monastery: (2)
As of 2024-07-25 05:43 GMT
Find Nodes?
    Voting Booth?

    No recent polls found

    erzuuli‥ 🛈The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.