my @questions

# a question from the Tasmanian Devil
push @questions, {id => 1, text => "Why for you want to bury me in the cold, cold ground?, show => 1};
# etc.

##</code><code>##

# Maxwell Smart?
my $new_q = {id => 9, text => "Shall we use the Cone of Silence?, show => 1};

splice @questions, 9, 0, $new_q;