use lib 'F:/scripts/perl/';
use junk;
use strict;
use warnings;

our $variable1;

print("\$variable1 = $variable1\n");

##</code><code>##

use strict;
package Foo;

our $bar = "guggug!\n";

package main;

print $bar;
__END__
guggug!