1234567891011 #!/usr/bin/perl -wuse Qt 2.0;import Qt::app;use DigitalClock;$clock = DigitalClock->new;$clock->resize(170, 80);$app->setMainWidget($clock);$clock->show();exit $app->exec();
#!/usr/bin/perl -w
use
Qt 2.0;
import
Qt::app;
DigitalClock;
$clock
= DigitalClock->new;
->resize(170, 80);
$app
->setMainWidget(
);
->show();
exit
->
exec
();