2011-05-08 2 views

답변

6

ASCII 문자는 \p{L} 또는 [a-zA-z]으로 간단하게 검색 할 수 있습니다. 첫 번째 일치 항목이 첫 번째 문자입니다.

문자열의 시작 부분을 일치 시키려면 (또는 \A[^a-zA-z]*[a-zA-z]) 사용할 수 있습니다.

은 참조 :

+1

없이 Perl regular expressions tutorial - More on characters, strings, and character classes 말을, 그 모든 것을 "문자"수단에 따라 달라집니다. 또한 : 이것은 스택 오버플로에 대한 나의 1000 번째 답변입니다 ... – Kobi

+2

+1 및 1000 답변에 대한 축하 : – alex

0
if ($string =~ m/([[:alpha:]])/) { 
    print $1, $/; 
} 
+0

그냥 궁금해,'$ /'무엇합니까? –

+1

오, 입력 레코드 구분 기호 (일반적으로 '\ n')를 보유하는 Perl 특수 변수입니다. 나는 아마 '$ 1 \ n "; 그것은 분명했을 것입니다. – DavidO

+0

@jb : 답은 명령 프롬프트에서입니다 :'perldoc -v $ /' – toolic

-1
my $let = $1 if '10emV' =~ m/([a-z]+?)/g; 
print $let; 
+2

조건에 어휘 변수를 선언하지 마십시오. '$ let'은 조건이 false를 반환하는 경우라고 생각합니까? :) –

+0

@brian d foy, 충분히 사실! 내 부주의 :( – abra

관련 문제