Can someone help me to understand what's wrong with this? (Or: what I
didn't understand about eval?)

$ perl -e 'use strict;use warnings;eval{open(OUT,"|file")};eval{print OUT 
"aa\n";};eval{close OUT};<STDIN>;'
Usage: file [-bcikLnNsvz] [-f namefile] [-F separator] [-m magicfiles] file...
       file -C -m magicfiles
Try `file --help' for more information.
$

Since the file command doesn't read from STDIN, the shell spits an error
message, as expected. The problem is that I expected the program to go
on instead of dying (that's what the "<STDIN>" is there to check). I
tried using a unique "eval" around everything since "open" till "close
OUT". No joy.
What is happening?

--
Jorge Almeida

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to