One Hat Cyber Team
Your IP :
172.16.0.254
Server IP :
58.26.163.33
Server :
Windows NT DGPENSV2LPKMN 10.0 build 14393 (Windows Server 2016) AMD64
Server Software :
Apache/2.4.46 (Win64) OpenSSL/1.1.1h PHP/7.3.25
PHP Version :
7.3.25
Buat File
|
Buat Folder
Eksekusi
Dir :
C:
/
xampp7
/
perl
/
vendor
/
lib
/
Class
/
Edit File:
LoaderTest.pm
#!/usr/bin/perl -sw ## ## ## ## Copyright (c) 2001, Vipul Ved Prakash. All rights reserved. ## This code is free software; you can redistribute it and/or modify ## it under the same terms as Perl itself. ## ## $Id: LoaderTest.pm,v 1.2 2001/05/01 00:09:12 vipul Exp $ package Class::LoaderTest; use Data::Dumper; sub new { my $self = { Method => 'new' }; return bless $self, shift; } sub foo { my ($class, $embed) = @_; $embed ||= 'foo'; my $self = { Method => $embed }; return bless $self, shift; } sub blah { my ($class, %params) = @_; my $self = { %params }; return bless $self, $class; } 1;
Simpan