Perl 의 string 과 array 의 length

array length 는 그냥 scalar 값으로 받으면 되고
string length 는 length() 함수 쓰면 된다.

 my @a = (1..5);  
 print "array : scalar(@a)\n";  

 my $a = @a;  
 print "array : $a\n";  

 my $s = "Love me";  
 print "string : " . length($s) . "\n";  

참고로 $#a 는 a 의 last index 값을 나타내는데 여기에 1을 더해서 array count 를 얻어올 수도 있다. 다음 코드는 3을 찍어준다.

 my @a = (1, 3, 5, 7);  
 print($#a);  
 print("\n");