Wednesday, August 02, 2006
펄 : Perl 프로그래밍 기초 예제 - Perl Example
가장 간단하고 초보적인, 펄의 예제입니다.
위의 펄 코드를 0.pl 등의 이름으로 하드에 저장하고, 명령 프롬프트에서, 윈도우용 액티브펄(ActivePerl)로 실행시키면 다음과 같은 화면이 나옵니다:
리눅스에서도 마찬가지 결과입니다.
#!/usr/bin/perl
이것은 perl shebang line 이라는 것인데, 펄이 설치된 위치를 지정합니다. 다만, 윈도우용 액티브펄을 설치한 경우에는, 이 줄이 없어도 됩니다. 그렇지만 반드시 붙여 주는 것이 좋습니다.
그런데 #!D:\Perl\bin\perl.exe 이런 식의 shebang 은 작동하지 않습니다. 윈도우에서 액티브펄을 사용할 때는 펄이 어디에 설치되어 있든 상관없이 그냥 #!/usr/bin/perl 이렇게 적어야 합니다.
use strict;
변수를 선언하지 않고 사용했을 때 에러(Global symbol "$i" requires explicit package name at D:\Z\foo.pl line 9)를 내게 하는 pragma 입니다.
use warnings;
는, 치명적이진 않지만 어떤 문제점이 있을 때, 경고를 내보내는 pragma 입니다.
use strict; 와 use warnings; 를 사용해야 디버깅이 편합니다.
샤프 기호 (#) 가, 펄의 주석입니다. # 기호 뒤에 있는 문자열들은 실행에서 무시됩니다.
my $i = 2 * 31;
변수를 선언할 때는 앞에 my 를 붙입니다.
print 나 printf 에서, 다음 줄로 행갈이를 할 때 \n 을 사용합니다.
함수를 정의할 때는 함수명 앞에 sub 를 붙입니다.
▶▶ Perl/펄] 변수 정의; 변수 선언, 초기화; Variable Initialize
▶▶ [Perl/펄 프로그래밍 기초] 배열(Array) 만들어 초기화시키고 출력하기
#!/usr/bin/perl
use strict;
use warnings;
# 예제 1 : 문자열 단순 출력
print "안녕하세요, 펄입니다.\n";
# 예제 2 : 함수 호출
&my_function;
# 예제 3 : 숫자 계산
my $i = 2 * 31;
printf("2 곱하기 31 은 %d\n", $i);
printf("2 곱하기 31의 결과를 16진수로는? : %X\n", $i);
# 함수 정의
sub my_function {
print "안녕하세요, 펄의 함수(서브루틴)입니다.\n";
}
use strict;
use warnings;
# 예제 1 : 문자열 단순 출력
print "안녕하세요, 펄입니다.\n";
# 예제 2 : 함수 호출
&my_function;
# 예제 3 : 숫자 계산
my $i = 2 * 31;
printf("2 곱하기 31 은 %d\n", $i);
printf("2 곱하기 31의 결과를 16진수로는? : %X\n", $i);
# 함수 정의
sub my_function {
print "안녕하세요, 펄의 함수(서브루틴)입니다.\n";
}
위의 펄 코드를 0.pl 등의 이름으로 하드에 저장하고, 명령 프롬프트에서, 윈도우용 액티브펄(ActivePerl)로 실행시키면 다음과 같은 화면이 나옵니다:
D:\Z>0.pl
안녕하세요, 펄입니다.
안녕하세요, 펄의 함수(서브루틴)입니다.
2 곱하기 31 은 62
2 곱하기 31의 결과를 16진수로는? : 3E
D:\Z>
안녕하세요, 펄입니다.
안녕하세요, 펄의 함수(서브루틴)입니다.
2 곱하기 31 은 62
2 곱하기 31의 결과를 16진수로는? : 3E
D:\Z>
리눅스에서도 마찬가지 결과입니다.
코드 설명
#!/usr/bin/perl
이것은 perl shebang line 이라는 것인데, 펄이 설치된 위치를 지정합니다. 다만, 윈도우용 액티브펄을 설치한 경우에는, 이 줄이 없어도 됩니다. 그렇지만 반드시 붙여 주는 것이 좋습니다.
그런데 #!D:\Perl\bin\perl.exe 이런 식의 shebang 은 작동하지 않습니다. 윈도우에서 액티브펄을 사용할 때는 펄이 어디에 설치되어 있든 상관없이 그냥 #!/usr/bin/perl 이렇게 적어야 합니다.
use strict;
변수를 선언하지 않고 사용했을 때 에러(Global symbol "$i" requires explicit package name at D:\Z\foo.pl line 9)를 내게 하는 pragma 입니다.
use warnings;
는, 치명적이진 않지만 어떤 문제점이 있을 때, 경고를 내보내는 pragma 입니다.
use strict; 와 use warnings; 를 사용해야 디버깅이 편합니다.
샤프 기호 (#) 가, 펄의 주석입니다. # 기호 뒤에 있는 문자열들은 실행에서 무시됩니다.
my $i = 2 * 31;
변수를 선언할 때는 앞에 my 를 붙입니다.
print 나 printf 에서, 다음 줄로 행갈이를 할 때 \n 을 사용합니다.
함수를 정의할 때는 함수명 앞에 sub 를 붙입니다.
▶▶ Perl/펄] 변수 정의; 변수 선언, 초기화; Variable Initialize
▶▶ [Perl/펄 프로그래밍 기초] 배열(Array) 만들어 초기화시키고 출력하기
tag: perl
Perl | 펄
<< Home