界面代码（这是我刚学两周的收获）

界面代码（这是我刚学两周的收获）
#!/usr/bin/perl -w
    # Display Hello World program
    
    use Tk;
    use strict;
    
    my $mw = MainWindow->new;
    $mw->geometry("600x400");
    $mw->title("Automated Testing Tool !!!");
    
    $mw->Button(-text => 'Browse')->place(-x=>20,-y=>60);

     $mw->Entry()->place(-x=>80,-y=>65);
    
    $mw->Button(-text => "Close", -command =>sub{exit})->place(-x=>270,-y=>350);
    
    MainLoop;

楼上的程序需要在浏览框中.
楼上的程序需要在浏览框中加载一个perl的脚本文件，
哪位高手可以指点一下该怎样编写？