On Thu, 31 Mar 2005 00:18:14 +0530, Ankur Gupta wrote:
> Hi,
>
> I have the following code :
>
> eval{
>
> require "file" or die "unable to find file";
>
> };
>
> print "$@";
>
> But it always prints "Can't locate file in @INC. blah blah "
>
> I want $@ to contain "unable to find file". What am I doing wrong or it is
> not possible to override [EMAIL PROTECTED]
>
> Thanks,
>
> Ankur
>
>
Hi Ankur,
Other people gave you good answers, I just wanted to claify to you why
your code didn't act as you expected.
Basically, you have the right idea - a die inside an eval will return
its argument in the $@ variable. The problem in your code is, your die
never gets executed! The "require", when it fails, dies itself, with
its own error message - it doesn't return false, so your die never
gets a chance to execute.
The solution, as other people have said, is simply to handle the
string outside the eval. Simply put:
eval {require "file"};
print "Unable to find file!\n" if $@;
See "perldoc perlvar" for details about $@, "perldoc -f eval" for more
info about "eval" and "perldoc -f require" for more "require" info.
Hope this helps,
--
Offer Kaye
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
