$| = 1; # Damit print-Ausgaben nicht gepuffert werden.
my $programm = "echo";
open( PIPE, " | $programm" )
  or die qq(Konnte Programm "$programm" nicht aufrufen -- $!\n);
print PIPE "Was auch immer.\n";
# print PIPE "weiteres\n"; # ...
close PIPE;