Select Code to Download

open FH, "|system_command";
print FH <<EOF

EOF

open my $fh, "|-", "system_command";

open FH, "|system_command";
my $stuff="some things to pass along to system command\n";
print FH $stuff;