open($file, "-|"): Ich frage mich, was genau mit "-|".... (Allgemeines zu Perl)

Gast Gast

2004-04-01 15:48

Hallo zusammen, ich frage mich , was da geöffnet wird.

Danke für eure Hilfe

[E|B]

2004-04-01 15:50

User since
2003-08-08
2561 Artikel
HausmeisterIn

HiHo!

1. Ich nehme an in $file steht dein Datei Handle und NICHT die zu öffnende Datei.
2. "|" ist eine Pipe. Je nachdem sie hinter oder vor dem File steht wird sie lesend oder schreiben benutzt.

Was "-" bedeutet, weiß ich selber nicht. Sieht aber so aus, als wäre das ganze nicht ganz richtig...

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

jan

2004-04-01 16:07

User since
2003-08-04
2536 Artikel
ModeratorIn

"-" kann doch einfach ein programm sein, das via pipe zum lesen geöffnet wird...

Relais

2004-04-01 16:11

User since
2003-08-06
2244 Artikel
ModeratorIn

Nicht annehmen; wissen, das der erste Parameter zu open das Filehandle ist. -> perlopentut

das - ist der Unix Shell entlehnt und bedeutet vor dem | soviel wie Input, STDIN oder auch nach dem | soviel wie Output, STDOUT.

Ich habe versucht nach dem Muster einen funktionsfähigen Tesfall hinzukriegen um ihn hier zu präsentieren, aber das ist mir nicht gelungen. Das - wird in der Verwendung mit open() nicht in den Dokus erwähnt, es ist ja auch gar nicht nötig, denn STDIN und STDOUT sind ja schon offen und brauchen gar keine Pipe.

Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming

Relais

2004-04-01 16:11

User since
2003-08-06
2244 Artikel
ModeratorIn

[quote=jan,01.04.2004, 14:07]"-" kann doch einfach ein programm sein, das via pipe zum lesen geöffnet wird...[/quote]
Probier das mal aus, viel Erfolg...

Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming

[E|B]

2004-04-01 16:22

User since
2003-08-08
2561 Artikel
HausmeisterIn

Und was soll dann das obige Beispiel?

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

pq

2004-04-01 16:23

User since
2003-08-04
12208 Artikel
Admin1

perldoc perlipc

"-|" macht ein fork(), und mit einem beispiel aus perlipc.pod kannst du
den output des childs einlesen...\n\n

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Relais

2004-04-01 16:26

User since
2003-08-06
2244 Artikel
ModeratorIn

[quote=pq,01.04.2004, 14:23]perldoc perlipc

"-|" macht ein fork(), und mit einem beispiel aus perlipc.pod kannst du
den output des childs einlesen...[/quote]
und suche nach "KID_TO_READ" - bei mir auf Zeile 776, also tief drin in der perldoc-Seite...

Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming