perltutorial
vroom
Perl makes it very easy to interface between other programs.
In this tutorial you'll learn how to do some very basic things like writing to
another program, reading the output from another program, just running an outside program.
<BR><BR>
The easiest and most often used way to run a program is to use the [system] function. When [system]
is called a child process is made and executed, once it is finished it returns to the parent program
(your script) and continues with its execution.
<BR>
For example if you had an image processing script you might want to allow a user
to view the resulting image at some point. You could do this with a call like the following:
<CODE>
system "xv $imagename";
</CODE>
When the [system] call was made in the program it would launch the program in this case xv. The
execution of our program would stop until after we had closed our xv program. After we close xv however
our Perl script would continue to run the code after the [system] statement.
<BR>
Now lets say you want to collect the output from a program and do something to it. There are at least two ways to do this.
One is with backticks (usually on the key to the left of your 1 key). This allows you to collect all of the output from a program
into a variable;
<CODE>
$output=`more datafile`;
</CODE>
Another way is to use [open] with a pipe. Basically this works the same as working with a filehandle
that you're reading from. All you do is something like:
<CODE>
$pid=open READER, "programname arguments|" or die "Can't run the program: $!\n";
while(<READER>){
$output.=$_;
}
close READER;
</CODE>
This [open] call returns the process id of the process it spawns. Then you just read from the handle with the <> operator and close it
when you're finished.
If you think about how you write to files you can probably guess how you write to processes.
<CODE>
$pid=open WRITETOME, "|programname arguments" or die "Couldn't fork process";
print WRITETOME "write this\n";
close WRITETOME;
</CODE>
All you have to do is open the process with the pipe on the left side, and then handle it like you would handle printing to a file.<BR><BR>
If you want to read and write to the same process take a look at [IPC::Open2] if you want to handle stderr in addition to that check out [IPC::Open3]