in reply to Re^2: Open a file using Tkx package
in thread Open a file using Tkx package

Uncommenting the line $source_file = Tkx::tk___getOpenFile(); and it runs.

In Section Seekers of Perl Wisdom