Perl/Qt
Einführung
Qt ist die Grundlage der erfolgreichen Benutzeroberfläche KDE und stellt eine moderne und auf
vielen Systemen verbreitete GUI-Bibliothek dar. Was liegt also näher als graphische Applikationen damit
zu entwickeln. Für Perler steht dafür seit kurzem das Paket Perl-Qt auch
für die aktuelle Qt Version zur Verfügung.
Nun kann man mit Perl ja schon länger für Qt programmieren, was ist also so neu daran?
Wer unter Linux/KDE schon programmiert hat kennt sicher die IDE KDevelop und den Qt-Designer. Dieses
Duo ermöglichte eine komfortable Anwendungsentwicklung ala Delphi für C und C++. Eines der
Herzstücken dieses Entwicklungssystemes ist der
uic der User Interface Compiler, der die
im Qt-Designer erstellten XML-Dateien in compilierbaren C++-Code übersetzt.
Nun gibt es diesen Compiler auch für Perl.
Man "schubst" im Designer also ganz locker seine Widgets zusammen, Tastendruck, GUI fürs neue
Programm fertig. Benutzer von Perl/Tk unter Windows sind diesen Komfort durch
TikiArtist? schon länger
gewöhnt.
Hier nun der Versuch einer Einführung in Perl/Qt:
Installation
Die Installation ist verhältnissmäßig einfach. Folgende Dinge gibt es zu beachten:
Systemvoraussetzungen sind Perl>=5.6.0 und Qt>=3.0, und es funktioniert im Moment nur auf
Posix-Systemen.
Nach der Anleitung gilt die klassische Regel: Download, Entpacken im User-Verzeichnis,
Compilieren, Hello World starten.
Download unter
http://perlqt.infonium.com/install.html
entpacken mit:
linux:~ # gunzip PerlQt-3.002.tar.gz
linux:~ # tar -xvf PerlQt-3.002.tar
Jetzt sollte ein Verzeichnis dieses Namens entstanden sein das alle Quellen enthält,
also hineinwechseln.
Das klassische "./configure - make - make install" hat bei mir nicht sofort zum Erfolg geführt, da
SuSE? eine andere Verzeichnisstruktur verwendet. Hier also der Weg für
SuSE? , andere Distributionen
sollten entsprechend angepaßt werden.
./configure --prefix=/opt/kde --with-qt-dir=/usr/lib/qt3
make
make install
Fertig. Jetzt steht einem Hello-World Versuch nichts mehr im Wege.
#!/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;
Ist das fehlerfrei geglückt, kann es richtig losgehen. Qt-Designer starten...
...be continued
Allgemeine Informationen
Projektseite bei Sourceforge
http://sourceforge.net/projects/perlqt
...be continued