1.2 KiB
1.2 KiB
반복문
for … / foreach …
#!/usr/bin/perl
use warnings;
use strict;
my @array = (0..9);
for (@array) {
print ("$_", "\n");
}
$_는 반복자라고 불리는 특수 변수입니다. 반복자를 명시하지 않으면 $_라는 특수 변수가 사용됩니다. 다음과 같이 반복자를 명시할 수도 있습니다.
for my $i (@array) {
print ("$i", "\n");
}
반복자의 값을 변경하면 배열의 요소에도 변경된 값이 적용됩니다.
my @array = (0..9);
for (@array) {
$_ = $_ +1;
}
print "@array\n";
C-스타일의 for 구문도 사용할 수 있습니다.
my @array = (0..9);
for (my $i=0; $i<=$#array; $i++) {
print ("$array[$i]", "\n");
}
while …
print "$i++\n" while ($i > 0);
while (my $input = <STDIN>) {
chomp $input;
}
do … while …
do {
...
} while (...);
until …
until(...) {
...
}
do … until …
do {
...
} until (...);
흐름 제어
next
C 언어의 continue와 비슷합니다.
while (...){
next if (...);
}
last
C 언어의 break와 비슷합니다.
while (...){
last if (...);
}