use Data::Dumper;
print Dumper {A=>'testA',B=>'testB'};

##</code><code>##

$VAR1 = {
          'A' => 'testA',
          'B' => 'testB'
        };

##</code><code>##

use Module::Load;
load 'Data::Dumper';
print Dumper {A=>'testA',B=>'testB'};