how to globalize a lexical variable inside a sub routine

[itshardtogetone]

Hi,
Assuming my script use a strict pragma. 
If I have a lexical variable declared inside a sub routine and I wish to 
globalize this lexical variable, what are the various options to globalise this 
variable?

Thanks

###############
use strict;
use warnings;

testing();

sub testing {
    my $variable = 2;
    print "I can see you Mr $variable\n";
}

print "So what are the various options to globalise this \$variable which is 
$variable\n";