1#!/usr/bin/perl -w
2
3use strict;
4
5use Test::Builder;
6
7my $tb = Test::Builder->new;
8$tb->plan( tests => 2 );
9$tb->ok(1);
10$tb->ok(1);
11$tb->done_testing(2);
12