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