my( @array ) = qw/one two three four five/;
foreach my $number ( @array ) {
    next if $number eq 'three';
    print $number, "\n";
}


##</code><code>##

one
two
four
five