Kommunikation zwischen zwei Scripts (in eine Richtung) - PIPEs? - #185085 (Allgemeines zu Perl)

Linuxer

2016-07-16 14:39

User since
2006-01-27
3891 Artikel
HausmeisterIn

user image

Hi,

Dein "Arbeitsskript" müsste beispielsweise von STDIN lesen,
Das "Fütterskript" ruft das Arbeitsskript über eine Pipe auf und schreibt dann die Werte in die Pipe...

Schema:

Arbeiter:

Code (perl): (dl )

#! /usr/bin/perl
use strict;
use warnings;
use 5.010;

# read from STDIN (or read from files given as arguments)
while ( my $line = <> ) {
  chomp $line;
  say "I got: $line";
}

Fütterer:

Code (perl): (dl )

#! /usr/bin/perl
use strict;
use warnings;
use 5.010;



my $worker = "./worker.pl";

my @values = 1 .. 10;

open( my $pipe, '|-', $worker ) or die "Can't open pipe to $worker: $!";

$pipe->autoflush;

for my $value ( @values ) {

  say $pipe $value;
  sleep 1;
}

close $pipe;

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!