배열의 각 요소에 액세스하는 방법 Perl

Question

my@arr=qw(Larrywall); 

이것은 내 배열이지만 액세스는 Y 만 원합니다. 어떻게하는지 알려주세요. 좋은 해답이 상당 할 것입니다.

Answer 1

qw(Foo Bar)은 ('Foo', 'Bar')과 동일합니다.

과 my @arr = qw(Larrywall)은 하나의 요소로 배열을 만듭니다. 당신이 당신의 문자열의 모든 문자를 반복하고 싶은 경우에, 당신은 문자로 분할 할 수 있습니다

my @arr = split //, "LarryWall"; 

// 부분은 당신이 당신의 문자열을 분할하려는 정규식입니다. 이 경우 항상 일치하는 빈 패턴을 사용하므로 기본적으로 모든 문자에 분할됩니다. 당신이 배열을 가지고 있고 그 문자로 각 요소를 분할 할 경우

, 당신은 이런 일을 할 수있는 :

my @arr = map { split //, $_ } qw(Larry Wall SomethingElse); 
#=> qw(L a r r y W a l l S o m e t h i n g E l s e) 

또는

my @arr = map { [split //, $_] } qw(Larry Wall SomethingElse); 
#=> ([qw(L a r r y)], [qw(W a l l)], [qw(S o m e t h i n g E l s e)]) 

배열의 유일한 요소에

Answer 2

사용 substr :

use strict; 
use warnings; 

my @arr = qw(Larrywall); 
print substr $arr[0], 4, 1; 

출력 :

y