in reply to IF and some conditions


And another one 
$test  = 7;
@array = qw(3 5 7);
foreach ( @array ){  print $test == $_ ? 'OK':undef;}

[download]


.:| If it can't be fixed .. Don't break it |:.

In Section Seekers of Perl Wisdom