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