Re: Nicer If...

One idea:

my @req_fields = qw(
 Shipping_address
 ...
 shipdayph
);
my @filled = grep { $query->param($_) } @req_fields;
failure if @req_fields && @filled
[download]

Update: I like suaveant's idea, though I think the conditional would be 'if $has == @ship_fields or $missing == @ship_fields'

Another update: Took suaveant's suggestion(s), thought I caught that first one :)

Ok, I get it now, duh..

In Section Seekers of Perl Wisdom