9 lines
146 B
Perl
9 lines
146 B
Perl
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
use QtGui4;
|
||
|
|
|
||
|
|
my $app = Qt::Application(\@ARGV);
|
||
|
|
my $label = Qt::Label('Goodbye, World');
|
||
|
|
$label->show;
|
||
|
|
exit $app->exec;
|