[perl] 임시...

lt 작다
gt 크다
eq 같다
le 작거나같다
ge 크거나같다
ne 같지않다
cmp 비교후 1,0,-1을 반환

정렬 역정렬
@a=sort(@a) reverse(sort(@a))
localtime(timeval)
int(rand(10))+1;
while($input ne ""){ ... }
for(0..@arrays-1){
print "value = #arrays[$_] \n";
}

shift 첫요소를꺼냄
unshift 첫요소를 추가, 나머지는 하나씩밀림
push 마지막에 요소추가
pop 마지막요소꺼냄

if($var==0){
print "OK\n";
}
print "OK\n" if($var==0);

반복문빠져나오기 last;
루프의 다음수행 next;

@array=(1,2,3,4,5);
$#array <- 4 배열마지막번지

:%s/old/new/gc 확인하며 교체
:7,11s/^/\t/g 7~11행 맨앞에 탭추가