use Data::Dumper;

print Dumper({-value => $id});