[Perl]홀수, 짝수 구하기

1부터 15까지의 수를 각각 한행씩, 전부 15행출력한다. 그때, 홀수짝수를 구별을 하기위해,

숫자의 두에 각각 [Even](홀수) 혹은 [Odd](짝수)의 문자열을 첨가.

use strict;

use warnings;

for (my $i = 1; $i <= 15; $i++) {

print (($i % 2) == 0 ? "[Even]" : "[Odd]", $i, "\n");

}

3-e.pl