One Hat Cyber Team
Your IP :
172.69.130.199
Server IP :
188.114.97.4
Server :
Linux thuru 6.5.11-4-pve #1 SMP PREEMPT_DYNAMIC PMX 6.5.11-4 (2023-11-20T10:19Z) x86_64
Server Software :
Apache/2.4.51 (Unix) OpenSSL/1.0.2k-fips
PHP Version :
7.3.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
perl5
/
vendor_perl
/
Mail
/
Mailer
/
Edit File:
rfc822.pm
# Copyrights 1995-2012 by [Mark Overmeer <perl@overmeer.net>]. # For other contributors see ChangeLog. # See the manual pages for details on the licensing terms. # Pod stripped from pm file by OODoc 2.00. use strict; package Mail::Mailer::rfc822; use vars '$VERSION'; $VERSION = '2.12'; use base 'Mail::Mailer'; sub set_headers { my ($self, $hdrs) = @_; local $\ = ""; foreach (keys %$hdrs) { next unless m/^[A-Z]/; foreach my $h ($self->to_array($hdrs->{$_})) { $h =~ s/\n+\Z//; print $self "$_: $h\n"; } } print $self "\n"; # terminate headers } 1;
Simpan