Friday, December 01, 2006
Perl/펄] COMMAND, CMD 실행 소스; 도스 셀(DOS Shell) 호출 예제
펄에서는 system() 함수로, 각종 외부 프로그램을 실행할 수 있습니다.
여기서는 펄 내부에서 도스창(정식 명칭은 '명령 프롬프트';CMD.EXE)을 실행하는 예제를 소개합니다.
윈도우2000/윈도우XP 이상의 운영체제에서는 도스창/도스셀이 CMD.EXE 라는 이름의 파일로 되어 있습니다. 그래서 CMD 를 실행하면 됩니다. (윈도우98이하에서는 COMMAND.COM 입니다.)
※ 아래 박스 클릭 후, 키보드 화살표 키로 좌우 스크롤 가능함
실행 결과:
system 함수와 exec 함수에 대한 설명은 여기에 있습니다: ▶▶ Perl/펄] 외부명령(dir 등) / 외부파일(.exe 등) 실행하는 함수; system, exec
system 함수 없이 실행하는 법: ▶▶ 펄/Perl] 외부명령 실행 후, 화면 글자 캡처하여 배열에 저장 - 실행 연산자 Backquote
여기서는 펄 내부에서 도스창(정식 명칭은 '명령 프롬프트';CMD.EXE)을 실행하는 예제를 소개합니다.
윈도우2000/윈도우XP 이상의 운영체제에서는 도스창/도스셀이 CMD.EXE 라는 이름의 파일로 되어 있습니다. 그래서 CMD 를 실행하면 됩니다. (윈도우98이하에서는 COMMAND.COM 입니다.)
도스쉘(COMMAND, CMD) 실행 예제 소스
※ 아래 박스 클릭 후, 키보드 화살표 키로 좌우 스크롤 가능함
#!/usr/bin/perl
use strict; use warnings;
print "윈도우의 도스셀(CMD.EXE)을 실행하겠습니다.\nexit 명령을 치면 다시 빠져 나옵니다.\n아무 키나 누르세요";
<STDIN>; # 화면 일시 정지
# 외부 프로그램(도스셀) 실행
!system('cmd') or die "외부 명령 실행에 실패했습니다ㅠㅠ : $!\n";
# 실행 종료 메시지
print "도스셀(CMD.EXE)이 성공적으로 실행되고 종료되었습니다.\n";
use strict; use warnings;
print "윈도우의 도스셀(CMD.EXE)을 실행하겠습니다.\nexit 명령을 치면 다시 빠져 나옵니다.\n아무 키나 누르세요";
<STDIN>; # 화면 일시 정지
# 외부 프로그램(도스셀) 실행
!system('cmd') or die "외부 명령 실행에 실패했습니다ㅠㅠ : $!\n";
# 실행 종료 메시지
print "도스셀(CMD.EXE)이 성공적으로 실행되고 종료되었습니다.\n";
실행 결과:
D:\Z>0.pl
윈도우의 도스셀(CMD.EXE)을 실행하겠습니다.
exit 명령을 치면 다시 빠져 나옵니다.
아무 키나 누르세요
Microsoft Windows 2000 [Version 5.00.2195]
(C) Copyright 1985-2000 Microsoft Corp.
D:\Z>
D:\Z>
D:\Z>
D:\Z>exit
도스셀(CMD.EXE)이 성공적으로 실행되고 종료되었습니다.
D:\Z>
윈도우의 도스셀(CMD.EXE)을 실행하겠습니다.
exit 명령을 치면 다시 빠져 나옵니다.
아무 키나 누르세요
Microsoft Windows 2000 [Version 5.00.2195]
(C) Copyright 1985-2000 Microsoft Corp.
D:\Z>
D:\Z>
D:\Z>
D:\Z>exit
도스셀(CMD.EXE)이 성공적으로 실행되고 종료되었습니다.
D:\Z>
system 함수와 exec 함수에 대한 설명은 여기에 있습니다: ▶▶ Perl/펄] 외부명령(dir 등) / 외부파일(.exe 등) 실행하는 함수; system, exec
system 함수 없이 실행하는 법: ▶▶ 펄/Perl] 외부명령 실행 후, 화면 글자 캡처하여 배열에 저장 - 실행 연산자 Backquote
tag: perl
Perl | 펄
<< Home