in reply to How to access main package global vars in modules

You need to fully qualify the variable: 
sub procedureA {
  print $main::glbA;
}

sub procedureB
{
  print $main::glbB;
}

[download]

In Section Seekers of Perl Wisdom