NAME

warnings - Perl pragma to control optional warnings

SYNOPSIS

use warnings;
no warnings;

use warnings "all";
no warnings "all";

use warnings::register;
if (warnings::enabled()) {
    warnings::warn("some warning");
}

if (warnings::enabled("void")) {
    warnings::warn("void", "some warning");
}

DESCRIPTION

If no import list is supplied, all possible warnings are either enabled or disabled.

A number of functions are provided to assist module authors.

use warnings::register

Creates a new warnings category which has the same name as the module where the call to the pragma is used.

warnings::enabled([$category])

Returns TRUE if the warnings category $category is enabled in the calling module. Otherwise returns FALSE.

If the parameter, $category, isn't supplied, the current package name will be used.

warnings::warn([$category,] $message)

If the calling module has not set $category to "FATAL", print $message to STDERR. If the calling module has set $category to "FATAL", print $message STDERR then die.

If the parameter, $category, isn't supplied, the current package name will be used.

See "Pragmatic Modules" in perlmod and perllexwarn.