Open a GUI dialog box with perl

Hello,

I just wrote a perl script with Materials Studio read some info from a text file. However, I have  have to change manually the file name each time I want to use it. Does anyone know how I can open a graphical dialog box to search for the files I need and select them with the mouse?

Thanks.

Best,

MCV