Executing a system command

[kirk124]

Hi,

Is there a way to execute a system command and read the output through a while loop using the back tick.

Normally I excute a command like this.

ie

System("ls > ls.txt"
open RI,&quot;<ls.txt&quot; || die &quot;can't open ls.txt: $!\n&quot;;

while(.....)
{
print(&quot;$line\n&quot;
}

thanks

 

[chazoid]

this will put the output from the system command into array @foo

@foo = `ls`;

for (@foo){
print $_;
}

 

[sampsonr]

Not quite, but you can read the command's output directly by opening it as a pipe.


# note the pipe operator in the filespec
open (RI,&quot;ls |&quot || die &quot;can't open ls command\n&quot;;
while($line = <RI>)
{
print(&quot;$line\n&quot;
}
clsoe RI;