The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

#! perl -w

use strict;
use warnings;

use Test::More tests => 10;

pass() for 1 .. 9;
is( 'foo', 'bar', 'no, it is not' );