Select Code to Download

use strict;
use warnings;
...

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