about a statement

[Jennifer G.]

what's this statement?

  eval {
    require MIME::Base64;
    require Authen::SASL;
  } or $self->set_status(500, ["Need MIME::Base64 and Authen::SASL
todo auth"]), return 0;

why ', return 0' can be used? I think maybe it should be ';' instead of ',' .
Can I rewrite it as below?

  eval {
    require MIME::Base64;
    require Authen::SASL;
  };

if ($@) {
    $self->set_status(500, ["Need MIME::Base64 and Authen::SASL todo auth"]);
    return 0;
}

Thanks!

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