Linux cpanel.rrshost.in 5.15.0-25-generic #25-Ubuntu SMP Wed Mar 30 15:54:22 UTC 2022 x86_64
Apache
: 109.123.238.221 | : 172.70.126.26
128 Domain
8.2.28
aev999
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
lib /
x86_64-linux-gnu /
perl /
5.34.0 /
File /
Spec /
[ HOME SHELL ]
Name
Size
Permission
Action
AmigaOS.pm
982
B
-rw-r--r--
Cygwin.pm
3.53
KB
-rw-r--r--
Epoc.pm
1.53
KB
-rw-r--r--
Functions.pm
2.29
KB
-rw-r--r--
Mac.pm
21.75
KB
-rw-r--r--
OS2.pm
6.61
KB
-rw-r--r--
Unix.pm
15.52
KB
-rw-r--r--
VMS.pm
15.94
KB
-rw-r--r--
Win32.pm
10.51
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : AmigaOS.pm
package File::Spec::AmigaOS; use strict; require File::Spec::Unix; our $VERSION = '3.80'; $VERSION =~ tr/_//d; our @ISA = qw(File::Spec::Unix); =head1 NAME File::Spec::AmigaOS - File::Spec for AmigaOS =head1 SYNOPSIS require File::Spec::AmigaOS; # Done automatically by File::Spec # if needed =head1 DESCRIPTION Methods for manipulating file specifications. =head1 METHODS =over 2 =item tmpdir Returns $ENV{TMPDIR} or if that is unset, "/t". =cut my $tmpdir; sub tmpdir { return $tmpdir if defined $tmpdir; $tmpdir = $_[0]->_tmpdir( $ENV{TMPDIR}, "/t" ); } =item file_name_is_absolute Returns true if there's a colon in the file name, or if it begins with a slash. =cut sub file_name_is_absolute { my ($self, $file) = @_; # Not 100% robust as a "/" must not preceded a ":" # but this cannot happen in a well formed path. return $file =~ m{^/|:}s; } =back All the other methods are from L<File::Spec::Unix>. =cut 1;
Close
