8 lines
146 B
Perl
8 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;
|