BEGIN { print "1..1\n" }

use TQt;

print "ok 1\n"