1#!/usr/bin/perl 2 3print <<'END_TESTS'; 41..2 5ok 1 - this is a test 6not ok 2 - this is another test 71..2 8END_TESTS 9