1#!/usr/bin/perl -w
2
3use strict;
4
5use Test::Builder;
6
7my $tb = Test::Builder->new;
8$tb->level(0);
9
10$tb->ok(1, "testing done_testing() with no arguments");
11$tb->ok(1, "  another test so we're not testing just one");
12$tb->done_testing();
13