Initial import of libqt-perl (not yet TQt compatible)

1 files changed, 13 insertions, 0 deletions

diff --git a/PerlQt/examples/buttongroups/buttongroups.pl b/PerlQt/examples/buttongroups/buttongroups.pl
new file mode 100644
index 0000000..3fdf884
--- /dev/null
+++ b/PerlQt/examples/buttongroups/buttongroups.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/perl -w
+use strict;
+use Qt;
+use ButtonsGroups;
+
+my $a = Qt::Application(\@ARGV);
+
+my $buttonsgroups = ButtonsGroups;
+$buttonsgroups->resize(500, 250);
+$buttonsgroups->setCaption("PerlQt Example - Buttongroups");
+$a->setMainWidget($buttonsgroups);
+$buttonsgroups->show;
+exit $a->exec;