Plack-App-MCCS
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
File::Spec 0
Locale::Maketext::Simple 0
Module::Load 0
Params::Check 0
Test::More 0
if 0
Log-Message-Simple-0.10
pathname: B/BI/BINGOS/Log-Message-Simple-0.10.tar.gz
provides:
Log::Message::Handlers 0.10
Log::Message::Simple 0.10
requirements:
Carp 0
ExtUtils::MakeMaker 0
Log::Message 0
Test::More 0
if 0
MRO-Compat-0.15
pathname: H/HA/HAARG/MRO-Compat-0.15.tar.gz
provides:
MRO::Compat 0.15
cpanfile.snapshot view on Meta::CPAN
requirements:
ExtUtils::MakeMaker 0
Term-UI-0.50
pathname: B/BI/BINGOS/Term-UI-0.50.tar.gz
provides:
Term::UI 0.50
Term::UI::History 0.50
requirements:
ExtUtils::MakeMaker 0
Locale::Maketext::Simple 0
Log::Message::Simple 0
Params::Check 0
Term::ReadLine 0
Test::More 0.31
if 0
parent 0
TermReadKey-2.38
pathname: J/JS/JSTOWE/TermReadKey-2.38.tar.gz
provides:
Term::ReadKey 2.38
requirements:
local/cache/modules/02packages.details.txt view on Meta::CPAN
Log::Dispatch::Types 2.71 D/DR/DROLSKY/Log-Dispatch-2.71.tar.gz
Log::Dispatch::Vars 2.71 D/DR/DROLSKY/Log-Dispatch-2.71.tar.gz
Log::Dispatchouli 3.005 R/RJ/RJBS/Log-Dispatchouli-3.005.tar.gz
Log::Dispatchouli::Global 3.005 R/RJ/RJBS/Log-Dispatchouli-3.005.tar.gz
Log::Dispatchouli::Proxy 3.005 R/RJ/RJBS/Log-Dispatchouli-3.005.tar.gz
Log::Fmt 3.005 R/RJ/RJBS/Log-Dispatchouli-3.005.tar.gz
Log::Message 0.08 B/BI/BINGOS/Log-Message-0.08.tar.gz
Log::Message::Config 0.08 B/BI/BINGOS/Log-Message-0.08.tar.gz
Log::Message::Handlers 0.10 B/BI/BINGOS/Log-Message-Simple-0.10.tar.gz
Log::Message::Item 0.08 B/BI/BINGOS/Log-Message-0.08.tar.gz
Log::Message::Simple 0.10 B/BI/BINGOS/Log-Message-Simple-0.10.tar.gz
LWP 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::Authen::Basic 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::Authen::Digest 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::Authen::Ntlm 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::ConnCache 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::Debug 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::Debug::TraceHTTP 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::DebugFile 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
LWP::MediaTypes 6.04 O/OA/OALDERS/LWP-MediaTypes-6.04.tar.gz
LWP::MemberMixin 6.72 O/OA/OALDERS/libwww-perl-6.72.tar.gz
local/lib/perl5/Log/Message/Simple.pm view on Meta::CPAN
package Log::Message::Simple;
use if $] > 5.017, 'deprecate';
use strict;
use Log::Message private => 0;;
BEGIN {
use vars qw[$VERSION];
$VERSION = '0.10';
}
=pod
=head1 NAME
Log::Message::Simple - Simplified interface to Log::Message
=head1 SYNOPSIS
use Log::Message::Simple qw[msg error debug
carp croak cluck confess];
use Log::Message::Simple qw[:STD :CARP];
### standard reporting functionality
msg( "Connecting to database", $verbose );
error( "Database connection failed: $@", $verbose );
debug( "Connection arguments were: $args", $debug );
### standard carp functionality
carp( "Wrong arguments passed: @_" );
croak( "Fatal: wrong arguments passed: @_" );
cluck( "Wrong arguments passed -- including stacktrace: @_" );
confess("Fatal: wrong arguments passed -- including stacktrace: @_" );
### retrieve individual message
my @stack = Log::Message::Simple->stack;
my @stack = Log::Message::Simple->flush;
### retrieve the entire stack in printable form
my $msgs = Log::Message::Simple->stack_as_string;
my $trace = Log::Message::Simple->stack_as_string(1);
### redirect output
local $Log::Message::Simple::MSG_FH = \*STDERR;
local $Log::Message::Simple::ERROR_FH = \*STDERR;
local $Log::Message::Simple::DEBUG_FH = \*STDERR;
### force a stacktrace on error
local $Log::Message::Simple::STACKTRACE_ON_ERROR = 1
=head1 DESCRIPTION
This module provides standardized logging facilities using the
C<Log::Message> module.
=head1 FUNCTIONS
=head2 msg("message string" [,VERBOSE])
local/lib/perl5/Log/Message/Simple.pm view on Meta::CPAN
{ package Log::Message::Handlers;
sub msg {
my $self = shift;
my $verbose = shift || 0;
### so you don't want us to print the msg? ###
return if defined $verbose && $verbose == 0;
my $old_fh = select $Log::Message::Simple::MSG_FH;
print '['. $self->tag (). '] ' . $self->message . "\n";
select $old_fh;
return;
}
sub debug {
my $self = shift;
my $verbose = shift || 0;
### so you don't want us to print the msg? ###
return if defined $verbose && $verbose == 0;
my $old_fh = select $Log::Message::Simple::DEBUG_FH;
print '['. $self->tag (). '] ' . $self->message . "\n";
select $old_fh;
return;
}
sub error {
my $self = shift;
my $verbose = shift;
$verbose = 1 unless defined $verbose; # default to true
### so you don't want us to print the error? ###
return if defined $verbose && $verbose == 0;
my $old_fh = select $Log::Message::Simple::ERROR_FH;
my $msg = '['. $self->tag . '] ' . $self->message;
print $Log::Message::Simple::STACKTRACE_ON_ERROR
? Carp::shortmess($msg)
: $msg . "\n";
select $old_fh;
return;
}
}
=head2 carp();
local/lib/perl5/Log/Message/Simple.pm view on Meta::CPAN
=head2 cluck();
Provides functionality equal to C<Carp::cluck()> while still logging
to the stack.
Exported by using the C<:CARP> tag.
=head1 CLASS METHODS
=head2 Log::Message::Simple->stack()
Retrieves all the items on the stack. Since C<Log::Message::Simple> is
implemented using C<Log::Message>, consult its manpage for the
function C<retrieve> to see what is returned and how to use the items.
=head2 Log::Message::Simple->stack_as_string([TRACE])
Returns the whole stack as a printable string. If the C<TRACE> option is
true all items are returned with C<Carp::longmess> output, rather than
just the message.
C<TRACE> defaults to false.
=head2 Log::Message::Simple->flush()
Removes all the items from the stack and returns them. Since
C<Log::Message::Simple> is implemented using C<Log::Message>, consult its
manpage for the function C<retrieve> to see what is returned and how
to use the items.
=cut
BEGIN {
use Exporter;
use Params::Check qw[ check ];
use vars qw[ @EXPORT @EXPORT_OK %EXPORT_TAGS @ISA ];;
local/lib/perl5/Term/UI/History.pm view on Meta::CPAN
package Term::UI::History;
$Term::UI::History::VERSION = '0.50';
use strict;
use warnings;
use parent
qw! Exporter
Log::Message::Simple
!;
use Log::Message 'private' => 0;
our $HISTORY_FH = \ *STDOUT;
our @EXPORT = qw[ history ];
my $log = Log::Message->new();
=pod
local/lib/perl5/Term/UI/History.pm view on Meta::CPAN
local $Term::UI::History::HISTORY_FH = \*STDERR;
=head1 DESCRIPTION
This module provides the C<history> function for C<Term::UI>,
printing and saving all the C<UI> interaction.
Refer to the C<Term::UI> manpage for details on usage from
C<Term::UI>.
This module subclasses C<Log::Message::Simple>. Refer to its
manpage for additional functionality available via this package.
=head1 FUNCTIONS
=head2 history("message string" [,VERBOSE])
Records a message on the stack, and prints it to C<STDOUT>
(or actually C<$HISTORY_FH>, see the C<GLOBAL VARIABLES> section
below), if the C<VERBOSE> option is true.
local/lib/perl5/Term/UI/History.pm view on Meta::CPAN
=item $HISTORY_FH
This is the filehandle all the messages sent to C<history()> are being
printed. This defaults to C<*STDOUT>.
=back
=head1 See Also
C<Log::Message::Simple>, C<Term::UI>
=head1 AUTHOR
This module by
Jos Boumans E<lt>kane@cpan.orgE<gt>.
=head1 COPYRIGHT
This module is
copyright (c) 2005 Jos Boumans E<lt>kane@cpan.orgE<gt>.
local/lib/perl5/x86_64-linux-thread-multi/perllocal.pod view on Meta::CPAN
=item *
C<VERSION: 0.08>
=item *
C<EXE_FILES: >
=back
=head2 Mon Aug 14 20:45:27 2023: C<Module> L<Log::Message::Simple|Log::Message::Simple>
=over 4
=item *
C<installed into: /home/ido/Code/foss/mccs/local/lib/perl5>
=item *
C<LINKTYPE: dynamic>
( run in 2.596 seconds using v1.01-cache-2.11-cpan-283623ac599 )