Ronny Haryanto wrote:
On Mon, Oct 11, 2004 at 10:42:54AM +0700, Beast wrote:
kenapa perl tdk bisa menagkap hasil jika yg diexecute adalah shell
script, bkan command.
#!/usr/bin/perl
# hasil blank
my $cmd1 = `cmd.sh`;
print "results: $cmd1\n";
# hasil ok.
my $cmd2 = `ls /home`;
print "results: $cmd2\n";
Saya rasa bukan masalah script atau command, tapi tergantung outputnya
ke mana, stdout? stderr? both?
sepertinya bukan.
kalau shell script stdout-nya sptnya di-redirect kemana gitu.
kalau pakai open baru bisa.
open (CMD, "cmd.sh |") or die "err:$!\n";
while <CMD> {
$result .= $_;
}
close CMD;
print "$result";
--
--beast
--
Berhenti langganan: [EMAIL PROTECTED]
Arsip dan info: http://linux.or.id/milis.php
