perl system함수의 표준출력을 변수로 얻는 방법[완료]

글쓴이: rev7707 / 작성시간: 수, 2010/03/24 - 4:09오후

안녕하세요 펄을 이제 막 시작했는데요.
system()함수 실행되서 표준출력(모니터)로 나오는 것을
펄의 변수에 넣을 방법을 못 찾아 헤매고 있습니다.
혹시 아시는 분 부탁드려요 ^^

예) system("ls") 하면 ls의 내용을 문자열로 받는 방법

답변 주셔서 감사합니다. 많은 도움 되었습니다.

혹시 저와 같이 잘 모르시는분은 참고 아래참조:
http://perl.active-venture.com/pod/perlopentut-openshell.html

Forums:

글쓴이: sangheon / 작성시간: 수, 2010/03/24 - 4:59오후

#! /usr/bin/perl
 
use strict;
use warnings;
 
my $fh;
open $fh, '|-', 'ls';
while ( <$fh> ) {
        print;
}
close $fh;
 
exit 0;

B/o/o/k/w/o/r/m/

Minimalist Programmer

글쓴이: aero / 작성시간: 수, 2010/03/24 - 5:28오후

3 paremeter open 문을 쓰는게 제일 안전하지만
간단하게 하시려면 다음과 같이 하면 됩니다.

perl -e 'my $str=`ls`;print $str'

부 메뉴