use strict;
use warnings;

my @globalarray;
my $gatekeeper = 1;

if($gatekeeper)
{
    push @globalarray, 'foo';
    # creates $globalarray[0]
}
print "$globalarray[0]\n";