use strict;
use warnings;

require('YIKES.pl');

use Devel::Symdump;
use Data::Dumper;

my @array = Devel::Symdump->scalars('main');
print Dumper \@array;