#!/usr/bin/perl
package Test;
my $test = "hallo";
our $test2 = "welt";

package main;
print $Test::test, "\n";
print $Test::test2, "\n";