0522. [Perl] (reference) array reference dereference 배열 레퍼런스 디레퍼런스

#!/usr/bin/perl

use warnings;

use strict;

use encoding "euc-kr";

 

@fruits=("Apple","Grape","Orange");

$ref=\@fruits;

 

print "Array reference : " . $ref . "\n";

 

@fruits2=@{$ref};

 

print $fruits[0] . "===" . $fruits2[0] . "\n";

print $fruits[1] . "===" . $fruits2[1] . "\n";

print $fruits[2] . "===" . $fruits2[2] . "\n";

 

 

[root@linuxtest kim]# ./ref.pl

Array reference : ARRAY(0x20cb278)

Apple===Apple

Grape===Grape

Orange===Orange

 

배열 Array 는 ( )

해쉬 Hash 는 { }

 

각 변수에 고유 ID 가 할당 되어있음. 이것을 변수 레퍼런스 reference 라고 부른다.

변수명 앞에 \ 를 붙이면 다른 변수의 레퍼런스를 검출할 수 있다

디레퍼런스 dereference :  레퍼런스를 저장한 변수에서 레퍼런스가 나타내는 원래 변수를 검출해 내는 작업