perl use syntax help

[nan li]

Hello,
I need some help to understand the following statement:

use Apache::Const -compile => 'OK';

It is from the program at
http://modperlbook.org/html/ch25_02.html. I don't know what it is doing
here.
Thanks a lot.

Nan

 

[Dave]

Hello,
I need some help to understand the following statement:

use Apache::Const -compile => 'OK';

It is from the program at
http://modperlbook.org/html/ch25_02.html. I don't know what it is doing
here.
Thanks a lot.

Nan

It allows the constant to be used, but it does not import it into the
current package. It allow the following line to work:
return Apache::OK;

had the line been simply:
use Apache::Const 'OK';

the constant (subroutine) OK would have been imported into the namespace
and:
return OK

would have worked. It is not recommended to import the constants in this
second manner as they may conflict with constants imported from other
modules.

 

[A. Sinan Unur]

Hello,
I need some help to understand the following statement:

use Apache::Const -compile => 'OK';

It is from the program at
http://modperlbook.org/html/ch25_02.html. I don't know what it is doing
here.

Do you think reading the documentation for the module might help?

NAME

Apache2::Const - Perl Interface for Apache Constants

Synopsis

# make the constants available but don't import them
use Apache2::Const -compile => qw(constant names ...);

# w/o the => syntax sugar
use Apache2::Const ("-compile", qw(constant names ...));