[perl] 참조변수

perl 에는 참조가 존재한다.

참조를 사용하는 이유는 여러가지가 있다.

  • 1.call by reference를 사용하기 위해서,

  • 2.함수의 반환이나 인자 전달에 의한 복사를 방지 하기위해,

  • 3.변수가 너무 길어서 짧은 이름으로 사용하고 싶을때

perl에서 어떤 변수의 참조(사실 나는 참조라고 배웠지만 C를 해본사람으로써 주소라는말이 더 어울린다.)
는 변수 앞에 \ (백슬래시) 를 붙여서 사용한다.

참조된 스칼라 변수에서 원래의 값을 뽑아낼려면 $를 두번 사용한다.

아래는 예시 코드이다.

source
my $n=5;
my $p=\$n;
print $p,"\n";
print $$p,"\n";
output
SCALAR(0x??????)
5