The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!./blib/script/seis
# L<S02/"Whitespace and Comments"/space before it, but may be written in any>
# use v6;

# Checking that testing is sane: counted tests


say '1..4';

my $counter = 1;
say "ok $counter";

$counter++;
say "ok $counter";

++$counter;
say 'ok ', $counter;

++$counter;
say 'ok ' ~ $counter;