#!/usr/bin/perl use junk; use strict; use warnings; package Mylib; our $variable1; package main; print("\$variable1 = $variable1\n"); __END__ $variable1 = string1