use Data::Dumper;
warn Dumper( \%questions );