Daftar Isi

• NAME
• SYNOPSIS
• DESCRIPTION

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");
 
 }
 
 
 if (warnings::enabled($object)) {
 
 warnings::warn($object, "some warning");
 
 }
 
 
 warnings::warnif("some warning");
 
 warnings::warnif("void", "some warning");
 
 warnings::warnif($object, "some warning");
 

DESCRIPTION

The warnings pragma is a replacement for the command line flag -w,but the pragma is limited to the enclosing block, while the flag is global.See perllexwarn for more information and the list of built-in warningcategories.

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

A number of functions are provided to assist module authors.

• use warnings::register

  Creates a new warnings category with the same name as the package wherethe call to the pragma is used.

• warnings::enabled()

  Use the warnings category with the same name as the current package.

  Return TRUE if that warnings category is enabled in the calling module.Otherwise returns FALSE.

• warnings::enabled($category)

  Return TRUE if the warnings category, $category, is enabled in thecalling module.Otherwise returns FALSE.

• warnings::enabled($object)

  Use the name of the class for the object reference, $object, as thewarnings category.

  Return TRUE if that warnings category is enabled in the first scopewhere the object is used.Otherwise returns FALSE.

• warnings::fatal_enabled()

  Return TRUE if the warnings category with the same name as the currentpackage has been set to FATAL in the calling module.Otherwise returns FALSE.

• warnings::fatal_enabled($category)

  Return TRUE if the warnings category $category has been set to FATAL inthe calling module.Otherwise returns FALSE.

• warnings::fatal_enabled($object)

  Use the name of the class for the object reference, $object, as thewarnings category.

  Return TRUE if that warnings category has been set to FATAL in the firstscope where the object is used.Otherwise returns FALSE.

• warnings::warn($message)

  Print $message to STDERR.

  Use the warnings category with the same name as the current package.

  If that warnings category has been set to "FATAL" in the calling modulethen die. Otherwise return.

• warnings::warn($category, $message)

  Print $message to STDERR.

  If the warnings category, $category, has been set to "FATAL" in thecalling module then die. Otherwise return.

• warnings::warn($object, $message)

  Print $message to STDERR.

  Use the name of the class for the object reference, $object, as thewarnings category.

  If that warnings category has been set to "FATAL" in the scope where $objectis first used then die. Otherwise return.

• warnings::warnif($message)

  Equivalent to:

   if (warnings::enabled())
   
    { warnings::warn($message) }
   

• warnings::warnif($category, $message)

  Equivalent to:

   if (warnings::enabled($category))
   
    { warnings::warn($category, $message) }
   

• warnings::warnif($object, $message)

  Equivalent to:

   if (warnings::enabled($object))
   
    { warnings::warn($object, $message) }
   

• warnings::register_categories(@names)

  This registers warning categories for the given names and is primarily foruse by the warnings::register pragma, for which see perllexwarn.

See Pragmatic Modules in perlmodlib and perllexwarn.