That's strange, last time I wanted to do this I had to use Win32::FileOp from Jan Krynicky. Maybe it was added to Win32::GUI in a recent version or I just overlooked the docs before.

It's not bad though, Win32::FileOp has some other nice functions for deleting\recyclying files etc. Worth a look.

update: Oh, you can use Win32::FileOp::BrowseForFolder() in a console script and avoid the overhead of loading Win32::GUI.

Simon Flack ($code or die)
$,=reverse'"ro_';s,$,\$,;s,$,lc ref sub{},e;$,
=~y'_"' ';eval"die";print $_,lc substr$@,0,3;