Help for this page
my $code = 'use Data::Dumper; print Dumper \%serial_of;'; eval $code;
use Data::Dumper; print Dumper \%serial_of; my $code = 'use Data::Dumper; print Dumper \%serial_of;'; eval $code;