Hello, Perl/Tk World!
Posted on 5月 13th, 2013 by cx20
Perl/Tk
Perl/Tk は Tcl スクリプト用の GUI ツールキット「Tk」を Perl から呼出し可能にしたライブラリである。
以下は Perl による Perl/Tk の呼出し例となっている。
ソースコード
use Tk; $window = MainWindow->new(); $window->title( 'Hello, World!' ); $window->geometry( '640x480' ); $label = $window->Label( -text => "Hello, Perl/Tk World!" ); $label->pack( -side => 'top', -anchor => 'w' ); MainLoop(); |
実行方法
C:¥> pl hello.pl |
実行結果
+------------------------------------------+ |Hello, World! [_][~][X]| +------------------------------------------+ |Hello, Perl/Tk World! | | | | | | | | | | | | | | | | | | | +------------------------------------------+ |
Tags: Tcl/Tk