#######################################
############ Global.pm
#######################################

#!/usr/bin/perl
#

use warnings;
use strict;

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

our $title = 'hello';

1;

########################################
########### test.pl
########################################

#!/usr/bin/perl

use strict;
use warnings;

use Global qw/$title/;

print $title;