DOKK / manpages / debian 12 / opalmod / OpaL::action.3pm.en
action(3pm) User Contributed Perl Documentation action(3pm)

OpaL::action - Perl extension for easier handling of what information that should be presented when a action is made.

  use OpaL::action qw(functionnames);

No functions or variables are exported automaticly so you have to specify them here.

OpaL::action is a module to allow some better bugtracking and information to be sent to the user/developer.

All functions are autoloaded so they will not be loaded into memory if you have not used them before.

There are 5 different levels of the information/action.

1.
critical
2.
error
3.
warning
4.
message
5.
debug

You can set on what errorlevel the program should exit if an error occur. The default level is 2 and you canges it like this:

USAGE:
"setQuitLevel"(level);

You can set an alternative error handler function (no arguments). The default one is exit.

USAGE:
"setErrorHandler"(\funcname);

You can set on what errorlevel the program should output messages if an error occur. The debug level indicates what type of information that should be presented to the user.

USAGE:
"setDebugLevel"(level);

You can set on what errorlevel the program should exit if an error occur.

USAGE:
$foo = "getQuitLevel";

You can get the debuglevel on which the program should output messages, if an error occurs.

USAGE:
$foo = "getDebugLevel";

You can set on what errorlevel the program should exit if an error occur. With the pdebug method you can present information and mark it with a debuglevel using:

USAGE:
"pdebug"(level, "A sample informational text." [,funcref]);

With this function you can handle and print a message if a function does not work correctly.

It will exit the program and print a message with the error level before if the action returns true and if the action_critic is lower or equal to the set error level.

If the debug level is high enough it will present the message but without the trailing error message.

USAGE:
"action"(some_action,
"A sample informational text about the action.",
how_critical [,funcref]);

The last parameter (how_critical) is optional.

Actually the same as action with the difference that it executes a external command instead.

It is almost identical to action(system"a command to execute", ...);

USAGE:
"cmdaction"("a command to execute.",
"A sample informational text about the action.",
how_critical, how_quiet [,funcref]);

The two last parameter (how_critical) is optional. The last parameter tells how quiet the executing command should be:
0 - extremely quiet (ie: >& /dev/null)
1 - quiet (ie: >& /dev/null)
2 - everything sent to stdout. =back

Ola Lundqvist <ola@inguza.com>

perl(1).

Hey! The above document had some coding errors, which are explained below:

You forgot a '=back' before '=head1'
2022-03-24 perl v5.34.0