⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.133
Server IP:
185.119.109.197
Server:
Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software:
Apache
PHP Version:
8.1.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
doc
/
liblog-log4perl-perl
/
examples
/
Edit File: color
#!/usr/bin/perl ###################################################################### # color - Print messages colored by level ###################################################################### use strict; use warnings; my $VERSION = "0.01"; our $CVSVERSION = '$Revision: 1.1 $'; use Log::Log4perl qw(:easy); Log::Log4perl->init(\ <<'EOT'); log4perl.category = DEBUG, Screen log4perl.appender.Screen = Log::Log4perl::Appender::ScreenColoredLevels log4perl.appender.Screen.layout = \ Log::Log4perl::Layout::PatternLayout log4perl.appender.Screen.layout.ConversionPattern = %d %F{1} %L> %m %n EOT for(1..3) { DEBUG "Debug Message"; INFO "Info Message"; WARN "Warn Message"; ERROR "Error Message"; FATAL "Fatal Message"; }
Simpan