my ($baseline, $oops) = grep { defined } @benchmarks{@BASELINES}; if(not defined $baseline) { die "No baseline case in file" } elsif(defined $oops) { die "Multiple baseline cases in file" }