Re^2: long if statements... What's the best way?


Clear questions and runnable code get the best and fastest answer
	PerlMonks

Re^2: long if statements... What's the best way?

by lodin (Hermit)

on Apr 03, 2008 at 12:32 UTC ( [id://678149]=note: print w/replies, xml )

Need Help??

in reply to Re: long if statements... What's the best way?
in thread long if statements... What's the best way?

Be aware of false strings that match.

use List::Util 'first';

my $var = '0';

if (first { $_ eq $var } $var) {
  print "Found.\n";
}
else {
  print "Not found.\n";
}

__END__
Not found.
[download]

You could solve this by using defined in this particular case, but it's not a general solution. As Herkum says, any from List::MoreUtils is a better alternative in the general case.

lodin