Perl Language
특수 변수

비고

perl의 특수 변수 :

1. $_ : 기본 입력 및 패턴 검색 공간.

예제 1 :

my @array_variable = (1 2 3 4);
foreach (@array_variable){
    print $_."\n";    # $_ will get the value 1,2,3,4 in loop, if no other variable is supplied.
}

예 2 :

while (<FH>){
    chomp($_);    # $_ refers to the iterating lines in the loop.
}

다음 함수는 $_ 을 기본 인수로 사용합니다.

abs, alarm, chomp, chop, chr, chroot, cos, defined, eval,
evalbytes, exp, fc, glob, hex, int, lc, lcfirst, length, log,
lstat, mkdir, oct, ord, pos, print, printf, quotemeta, readlink,
readpipe, ref, require, reverse (in scalar context only), rmdir,
say, sin, split (for its second argument), sqrt, stat, study,
uc, ucfirst, unlink, unpack.

2. @_ :이 배열은 서브 루틴에 전달 된 인수를 포함합니다.

예제 1 :

example_sub( $test1, $test2, $test3 );

sub example_sub {
    my ( $test1, $test2, $test3 ) = @_; 
}

서브 루틴 내에서 배열 @_ 은 해당 서브 루틴에 전달 된 인수를 포함합니다. 서브 루틴 안에서 @_ 은 배열 연산자 pop 과 shift 의 default 배열입니다.