Move PerlQt

1 files changed, 0 insertions, 13 deletions

diff --git a/PerlQt/examples/aclock/aclock.pl b/PerlQt/examples/aclock/aclock.pl
deleted file mode 100644
index b4ae659..0000000
--- a/PerlQt/examples/aclock/aclock.pl
+++ /dev/null
@@ -1,13 +0,0 @@
-#!/usr/bin/perl -w
-use strict;
-use TQt;
-use AnalogClock;
-
-my $a = TQt::Application(\@ARGV);
-my $clock = AnalogClock;
-$clock->setAutoMask(1) if @ARGV and $ARGV[0] eq '-transparent';
-$clock->resize(100, 100);
-$a->setMainWidget($clock);
-$clock->setCaption("PerlTQt example - Analog Clock");
-$clock->show;
-exit $a->exec;