在Perl中進行GUI編程通常使用Tk模塊。Tk是一個用于創建圖形用戶界面的工具包,可以在Perl中使用。
以下是一個簡單的示例代碼,演示了如何在Perl中創建一個簡單的GUI窗口:
use Tk;
my $mw = MainWindow->new;
$mw->title("Hello, GUI!");
my $label = $mw->Label(-text => "Hello, Perl GUI!")->pack;
my $button = $mw->Button(-text => "Click me", -command => \&button_click)->pack;
sub button_click {
$label->configure(-text => "Button clicked!");
}
MainLoop;
以上代碼創建了一個簡單的GUI窗口,包括一個標簽和一個按鈕。當按鈕被點擊時,標簽的內容將被改變。
需要注意的是,Tk模塊需要在系統中安裝Tk工具包,可以通過CPAN來安裝Tk模塊。另外,Perl中還有其他GUI工具包可供選擇,如WxPerl和Gtk2-Perl等。