#!/usr/bin/perl
use strict;
$main::foo = 'bar';
$main::baz = 'qux';