use Test::More; diag rand(1); ok 1; done_testing;