Perl로 파일에서 번호를 읽으려면 어떻게해야합니까?

"month.txt"파일에는 한 달에 해당하는 숫자 (3)가 있습니다.

그러나 "month.txt"파일을 읽고 $ monthRaed에 결과를 놓으면 GLOB 오류가 발생합니다. 여기

내가 무슨 짓을했는지 있습니다 :

open $MONTH, "+<", "month.txt"; 
$monthRaed = $MONTH;

을 그리고 나는 print $monthRaed;을 할 경우, 나는이 오류가 발생합니다 : GLOB을 (0xf796c8)

나는 숫자 (에 저장된 하나가 필요합니다 이 파일은 현재 달과 비교를 위해 localtime 함수에서 숫자로 나옵니다.

2014-03-25 user211435

+ <'오픈 모드, 그것이 가치가있다, 그리고보다 더 많은 문제이기 때문에 아마도 장기적으로 당신이 원하는 것을하지 않을 것입니다. 대신, tmp 파일에 인쇄하고 나중에 파일을 이동하십시오. – TLP

당신의 코드가 효과가 있다고 생각하는 이유가 정말로 이해가되지 않습니다. 그 코드는 어디에서 가져 왔습니까? –

변경 :

$monthRaed = $MONTH;

에 : 당신은 아마`사용하지 말아야

$monthRaed = <$MONTH>;

2014-03-25 13:53:07 toolic

아마도 "perldoc -f open"에 대한 링크를 추가하면 이것이 필요한 이유를 설명하는 데 도움이됩니다. 그렇지 않으면 명백하지 않습니다. –

관련 링크가 이미 있습니다. – toolic

사실! 그것을 보지 못했다 - 건배 –

답변