Perl : 기본 질문, 함수 기능

Question

이 함수의 기능은 무엇입니까?

sub MyDigit { 
     return <<END; 
     0030\t0039 
     END 
    } 

Answer 1

:

print "this is ", 
    "one line when printed, ", 
    "because print takes multiple ", 
    "arguments and prints them all!\n"; 
print "however, you can also " . 
    "concatenate strings together " . 
    "and print them all as one string.\n"; 

print <<DOC; 
But if you have a lot of text to print, 
you can use a "here document" and create 
a literal string that runs until the 
delimiter that was declared with <<. 
DOC 
print "..and now we're back to regular code.\n"; 

설명서에 대한 자세한 내용은 perldoc perlop을 참조하십시오.

Answer 2

그것은 뭔가 문자열을 반환하는 Here Document라고 사용하는 "0030 \ t0039"는 "here-document"을라고, 그리고 연결하는 대안 또는 목록 작업으로 여러 줄에 걸쳐 문자열을 분쇄에 사용되는

Answer 3

문자열이 "0030\t0039\n" (\t은 탭이고, \n은 줄 바꿈 (분명히)로 끝나기 때문에 추가되는 새 줄)을 반환합니다.

<<FOO 
sometext 
FOO 

여러 줄의 문자열을 편리하게 작성하는 방법 인 heredoc (여기서는 단 한 줄만 사용함)입니다.

Answer 4

당신은 간단한 실험을 시도하여 자신을 도울 수 :

C:\Temp> cat t.pl 
#!/usr/bin/perl 

use strict; use warnings; 

print MyDigit(); 

sub MyDigit { 
    return <<END; 
    0030\t0039 
END 
} 

출력 :

C:\Temp> t | xxd 
0000000: 2020 2020 3030 3330 0930 3033 390d 0a  0030.0039..

지금, 당신의 경우, END가 줄의 시작 부분에 줄 지어되지 않으므로 메시지를 받아야합니다 :

Can't find string terminator "END" anywhere before EOF at …

Answer 5

모두를 놓쳤습니다!

그것은 정규 표현식을 사용하여 \p{MyDigit} 및 \P{MyDigit}에 사용할 사용자 정의 속성을 정의합니다.

그것은 이들처럼 : 또는

sub InKana { 
     return <<'END'; 
    3040 309F 
    30A0 30FF 
    END 
    } 

, 기존 속성 이름의 관점에서 그것을 정의 할 수 있습니다 : 당신은 또한 사용하여 뺄셈을 설정 할 수

sub InKana { 
     return <<'END'; 
    +utf8::InHiragana 
    +utf8::InKatakana 
    END 
    } 

"C를 < ->"접두사 . 만 문자의 블록 범위가 아닌 실제 문자를 원한다고 가정합니다. 당신은 이런 식으로 모든 정의되지 않은 것들을 걸러 수 :

sub IsKana { 
     return <<'END'; 
    +utf8::InHiragana 
    +utf8::InKatakana 
    -utf8::IsCn 
    END 
    } 

은 "C"접두어를 사용하여 설정 당신은 또한 보완 문자로 시작할 수 있습니다

: 내가 잘해야합니다 그림

sub IsNotKana { 
     return <<'END'; 
    !utf8::InHiragana 
    -utf8::InKatakana 
    +utf8::IsCn 
    END 
    } 

을, 이후 나는 ex camelis라고 말하고 있습니다. :)