Instead of:
 my $x_axis_label = %specifications{'Central_comparisons'}{'Primary'};

Try:
 my $x_axis_label = $specifications{'Central_comparisons'}{'Primary'};