#Global.pm
#!/usr/bin/perl
#
#
use strict;
use warnings;


package Global;
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw($title $header);

my $title = 'hello';


1;

#hi.pl
#!/usr/bin/perl
#
use Global qw($title);

print $title;