for my $gas_cost (@gasCosts) {
  if ($gas_cost < 1) {
    print "Bad gas - $gas_cost\n";
    next;
  }

  ...
}

##</code><code>##

eval {
  die "Bad gas - $gas_cost\n" if $gas_cost < 1;
  ...
  return 1;
} or do {
  my $err = $@;
  
  print "Error handling gas: $err"
};