#!/usr/bin/perl

use strict;
use warnings;

package Test;
my $i = 9;

package main;
print $i;