현재 위치

홈 ›› Forums ›› 공부 ›› 프로그래밍 QnA

perl script 작성 관련 문의...

lynx38의 이미지
글쓴이: lynx38 / 작성시간: 월, 2009/04/20 - 1:45오후

Perl 고수 분들께 질문입니다.
perl script을 작성하고 있는데요..

예로 test01.pl에 있는 변수를 동일하게 test02.tcl에 사용하려고 합니다.
다시 말하면, test01.pl이 top script이 되는 것이고 거기에서 test02.tcl를 불러서 사용할 것인데..
test01.pl의
$aaa = tiger;라고 $aaa에 할당된 입력값을
test02.tcl 내부에 $aaa에 할당된 값을 다시 불러서 쓰려면 어떻게 해야 하나요?

워낙 perl에 초보인지라..
무식한 질문이라고 치부치 마시구..
가르쳐 주시면 감사하겠습니다.. ㅜ.ㅜ

Forums: 
프로그래밍 QnA
aero의 이미지

글쓴이: aero / 작성시간: 월, 2009/04/20 - 3:00오후

.
.
.
.
.
p.pl

#!/usr/bin/perl
use strict;
use warnings;
 
my $aaa = 'tiger';
system("./t.tcl $aaa");

t.tcl

#!/usr/bin/tclsh
 
set aaa [lindex $argv 0]
puts stdout "$aaa"

결과

# ./p.pl
tiger
lynx38의 이미지

글쓴이: lynx38 / 작성시간: 월, 2009/04/20 - 5:21오후

system("./t.tcl $aaa");로 하면..
t.tcl을 실행시키게 되는데요..

현재 t.tcl을 바로 실행시키지 않고,
아래의 예처럼 다른 tool과 연계시켜서 돌려야 되기 때문에
ex) ex_tools -batch t.tcl

perl script(test01.pl)에서 설정한 변수를 tcl script(test02.tcl)이 인식하도록 설정한 이후에..
ex_tools -batch t.tcl과 같이 실행할 수 있도록 하려면 어떻게 해야하지요?

aero의 이미지

글쓴이: aero / 작성시간: 월, 2009/04/20 - 5:32오후

perl이 결과를 어떤 파일로 저장하도록 하고
그 결과 파일을 tcl이 읽어서 쓰도록 하면 될 것 같습니다.

lynx38의 이미지

글쓴이: lynx38 / 작성시간: 월, 2009/04/20 - 5:36오후

완전 초보인지라.. ㅠ.ㅠ
부탁 좀 드리겠습니다..

aero의 이미지

글쓴이: aero / 작성시간: 월, 2009/04/20 - 6:17오후


http://www.google.com/search?q=perl+write+file

http://www.google.com/search?q=tcl+read+file

둘러보기