use Data::Dumper;
print Dumper({ test1=>scalar( 7,13 ), test2=>scalar( ()=(7,13) ) }), "\n";