#!perl -I. #t.pl use strict; use warnings; use XTest; print "ok\n";