用于UI的Perl的Tk库

Question

我正在尝试使用Perl的Tk库来为我的脚本创建UI。

当我这样做时

perl -e "use Tk"

显示提示，指示模块存在。

但是，当我尝试运行一个简单的程序时，我收到错误：

  

无法在@INC中找到Tk.pm（@INC包含：/ opt / rh / devtoolset-2 / root / usr / lib64 / perl5 / vendor_perl / opt / rh / devtools ...... .............等等）./UITRY.pl第5行   BEGIN失败 - 汇编在./UITRY.pl第5行中止。**

代码是：

#!/usr/bin/perl

# Display Hello World program

use Tk;

my $mw = MainWindow->new;
$mw->geometry("200x100");
$mw->title("Hello World!!!");
$mw->Label(-text => 'Hello World')->pack();
$mw->Button(-text => "Close", -command =>sub{exit})->pack();

MainLoop;