I can suggest you a way to increase a probabliity of successfull searching for your application, or any other perl+Tk.

I also have several application good working this way.

Find such application among Tcl/Tk applications (there are surprisingly many GUI application that do many different things, look at http://resource.tcl.tk/resource/software/applications/)

After that you do

use Tcl::Tk qw(:perlTk);
my $int = new Tcl::Tk;
$int->Eval(<<'EOS');
#...you...paste...tcl/tk code here
# or write it
source /path/to/my/file
EOS

# here you can access Tcl/Tk widgets by using
my $button = $int->widget(".ff.path.to.widget");
# and tie perl variable to Tcl variable and it is
# configured to be displayed on GUI
my $labtext;
tie $labtext, 'Tcl::Var', $int, "labtext";

# for example
$button->configure( -command=> sub {
  print "Hey, man, you just pressed the button\n";
  $labtext = "indeed, that man pressed the button";
});

$int->MainLoop;
[download]

Then you can add powerful functionality by adding Perl-coded logic to Tcl/Tk GUI

Not that I want to obtrude that way, but this is a way I have some GUI Perl applications working with really few efforts spent, and continuing coding using Perl only.

Courage, the Cowardly Dog