1use Test::Base;
2
3__DATA__
4=== Strict Test
5
6--- perl strict
7my $x = 5;
8--- strict
9use strict;
10use warnings;
11my $x = 5;
12