Make lc/uc/lcfirst/ucfirst warn when passed undef.
[p5sagit/p5-mst-13.2.git] / t / lib / source_tests / harness_directives
1 #!/usr/bin/perl
2
3 print <<'END_TESTS';
4 1..3
5 ok 1 - this is a test
6 not ok 2 - we have a something # TODO some output
7 ok 3 houston, we don't have liftoff # SKIP no funding
8 END_TESTS