use warnings; use strict; use MyPackage; print $MyPackage::var;