summaryrefslogtreecommitdiffstats
path: root/PerlQt/tutorials/t1
diff options
context:
space:
mode:
authorTimothy Pearson <[email protected]>2011-12-18 03:08:08 -0600
committerTimothy Pearson <[email protected]>2011-12-18 03:08:08 -0600
commitbcc95cd92ca12c1783464b8ada6816d430dc0e98 (patch)
tree4701c447365db5392df0174b4bb00b5b5c369da4 /PerlQt/tutorials/t1
downloadlibtqt-perl-bcc95cd92ca12c1783464b8ada6816d430dc0e98.tar.gz
libtqt-perl-bcc95cd92ca12c1783464b8ada6816d430dc0e98.zip
Initial import of libqt-perl (not yet TQt compatible)
Diffstat (limited to 'PerlQt/tutorials/t1')
-rw-r--r--PerlQt/tutorials/t1/t1.pl13
1 files changed, 13 insertions, 0 deletions
diff --git a/PerlQt/tutorials/t1/t1.pl b/PerlQt/tutorials/t1/t1.pl
new file mode 100644
index 0000000..a1e2cd8
--- /dev/null
+++ b/PerlQt/tutorials/t1/t1.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/perl -w
+use strict;
+use blib;
+use Qt;
+
+my $a = Qt::Application(\@ARGV);
+
+my $hello = Qt::PushButton("Hello World!", undef);
+$hello->resize(100, 30);
+
+$a->setMainWidget($hello);
+$hello->show;
+exit $a->exec;