Opened by Gast at 2006-10-04 16:00
User since
2006-01-27
3890 Artikel
HausmeisterIn
2006-01-27
3890 Artikel
HausmeisterIn
Hi,
folgender Code arbeitet anstandslos unter Linux. Die Meldung scheint mir WinDOS-spezifisch.
Aber wofür soll denn eigentlich STDOUT auf binmode geschaltet werden? Der Ausgabetext (vom Beispielscript) ist doch simpler ASCII-Text?
Mehr kann ich aktuell nicht testen mangels WinDOS (und tieferer Kenntnis in WinDOS, was Pipes und andere Systeminterna angeht).
Vielleicht bieten perlipc und/oder perlportnoch Infos dazu?
@Lichtkind
Überarbeite mal Deinen CPAN-Link; Term::RedKey gibt's nicht ;o)
folgender Code arbeitet anstandslos unter Linux. Die Meldung scheint mir WinDOS-spezifisch.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl
# vi:ts=4 sw=4 et:
use strict;
use warnings;
binmode(STDIN);
binmode(STDOUT);
my $char = '';
while ( $char = getc(STDIN) ) {
print ord( $char ), $/;
}
Aber wofür soll denn eigentlich STDOUT auf binmode geschaltet werden? Der Ausgabetext (vom Beispielscript) ist doch simpler ASCII-Text?
Mehr kann ich aktuell nicht testen mangels WinDOS (und tieferer Kenntnis in WinDOS, was Pipes und andere Systeminterna angeht).
Vielleicht bieten perlipc und/oder perlportnoch Infos dazu?
@Lichtkind
Überarbeite mal Deinen CPAN-Link; Term::RedKey gibt's nicht ;o)
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!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!