Badger::Constants - defines constants for other Badger modules
use Badger::Constants 'HASH';
if (ref $something eq HASH) {
# rejoice! No need to quote the word 'HASH'
}
This module defines a number of constants used by other
"Badger" modules. They can be imported into
the caller's namespace by naming them as options to the
"use Badger::Constants" statement:
use Badger::Constants 'HASH';
print HASH; # HASH
Alternatively, one of the tagset identifiers may be specified to
import different sets of constants.
use Badger::Constants ':types';
print HASH; # HASH
Set to "Badger::Constants".
The literal word "SCALAR", typically used for
testing references.
if (ref $data eq SCALAR) {
...
}
The literal word "ARRAY", typically used for
testing references.
if (ref $data eq ARRAY) {
...
}
The literal word "HASH", typically used for
testing references.
if (ref $data eq HASH) {
...
}
The literal word "CODE", typically used for
testing references.
if (ref $data eq CODE) {
...
}
The literal word "GLOB", typically used for
testing references.
if (ref $data eq GLOB) {
...
}
The literal word "Regexp", typically used for
testing references.
if (ref $data eq REGEX) {
...
}
A generic flag used to disable things (0).
A generic flag used to enable things (1).
The literal string "all".
The literal string "none".
The literal string "default".
The literal string "warn".
The value "-1", used to index the last item in
an array.
$array[LAST];
An unambiguous carriage return and newline sequence:
"\015\012"
An alias for the "::" symbol used to delimiter
Perl packages. Typically used to construct symbol references.
use Badger::Constants 'PKG';
use constant EXAMPLE => 'EXAMPLE';
my $var = ${ $pkg.PKG.EXAMPLE }; # same as: ${"${pkg}::EXAMPLE"}
The literal string "refs". Typically used like
so:
no strict REFS;
The literal string "once". Typically used like
so:
no warnings ONCE;
An empty string. How much more blank could this be? And the answer is none. None
more blank.
A single space character. Not to be confused with the three dimensional fabric
of reality that it happens to share a name with.
A forward slash as used to separate path segments in URIs and filesystem paths
on sane operating systems.
A regular expression used to split whitespace delimited tokens. Also accepts
commas with optional trailing whitespace as a delimiter.
$names = [ split DELIMITER, $names ]
unless ref $names eq ARRAY;
A regular expression used to match strings containing the
"*" or "?"
wildcard characters.
if ($path =~ WILDCARD) {
# do someting...
}
The literal string "utf8".
The literal string "json".
The literal string "yaml".
Contains the literal string "BADGER_LOADED".
The Badger::Class module uses it to define the
$BADGER_LOADED variable in any modules that it loads.
The following tag sets and associated constants are defined:
SCALAR HASH ARRAY CODE REGEX
FALSE TRUE OFF ON ALL NONE DEFAULT
Andy Wardley <http://wardley.org/>
Copyright (C) 1996-2009 Andy Wardley. All Rights Reserved.
This module is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.
See Badger::Exporter for more information on exporting variables.