Webmarquee Administrator wrote:
#!/usr/bin/perl
$x = <STDIN>;
STDIN works on a line-by-line basis, doesn't it? By calling it only
once, you only receive one (the first) line of the input. You seem to
need the WHILE loop, as in:
open (FILE,">test.data");
while (<STDIN>) {
print FILE $_;
}
close (FILE);
This works for me. HTH,
marek
--
Invalid thought. Close all mental processes and restart body.
Largactil Café http://www.lodz.pdi.net/~eristic/index.html
Send message with GET PGP_KEY in subject for PGP public key.
Hail Eris. *plonk* trolls. Fight spam: http://www.cauce.org/