use Devel::Peek;

BEGIN {
  *main::foo1 = [];
  package X;
  *main::foo2 = [];
};

Dump($_) for \*main::foo1, \*main::foo2;