#!/usr/bin/perl
use warnings;

my $foo = 'bar';
use strict;

exit(0);
my $baz = 'quux';