#!./perl use strict; use warnings; # Sorry - no tests yet print "1..1\nok 1\n";