my @missing; foreach my $f (@fields) { if ($account{$f} eq undef) { push(@missing, @acct_fields{$f}); } } [download]
if ($#missing > -1) { $" = ', '; do something.... } [download]
In reply to What does $# stand for? by Kiko