[완료]perl에 관한 질문입니다.

글쓴이: papa3721 / 작성시간: 목, 2007/10/11 - 11:22오후

#!/usr/bin/perl -w
use strict;

my($arg, $s);

foreach $arg (@ARGV)
{
$s = "$arg $s";
}
print $s;

$> ./t.pl 12 34 56
Use of uninitialized value in concatenation (.) or string at ./t.pl line 8.
56 34 12

왜 에러가 발생하는지 모르겠네요.

Forums:

글쓴이: redneval / 작성시간: 목, 2007/10/11 - 11:35오후

변수를 초기화하지 않아서 그렇습니다.

#!/usr/bin/perl -w
use strict;
my $s;
print $s;

위의 코드는 경고(warning)를 냅니다.

다음과 같이 변수에 빈 문자열을 넣어주세요.

#!/usr/bin/perl -w
use strict;
my $s = "";
print $s;

--------------------Signature--------------------
"What can change the nature of a man?"

글쓴이: gamdora / 작성시간: 목, 2007/10/11 - 11:38오후

$s를 초기화하지 않고 읽었기 때문입니다.

my($arg, $s) = ('', '');
로 초기화하면 됩니다.

글쓴이: papa3721 / 작성시간: 금, 2007/10/12 - 12:01오전

부 메뉴