NAME

App::unbelievable::Util - common utilities

VARIABLES

$VERBOSE

When truthy, "_diag" produces output.

FUNCTIONS

import

Load strict, warnings, &c. into the caller.

_croak

Lazy "croak" in Carp.

_diag

Lazy "diag" in Test::More, conditioned on "$VERBOSE". If the first argument is a scalar reference, output is suppressed unless "$VERBOSE" is at least the referenced value.

_line_mark_string

Add a #line directive to a string. Usage:

my $str = _line_mark_string <<EOT ;
$contents
EOT

or

my $str = _line_mark_string __FILE__, __LINE__, <<EOT ;
$contents
EOT

In the first form, information from caller will be used for the filename and line number.

The #line directive will point to the line after the _line_mark_string invocation, i.e., the first line of <C$contents>. Generally, $contents will be source code, although this is not required.

$contents must be defined, but can be empty.