ACIL FM
Dark
Refresh
Current DIR:
/usr/lib64/perl5/vendor_perl/File/Spec
/
usr
lib64
perl5
vendor_perl
File
Spec
Upload
Zip Selected
Delete Selected
Pilih semua
Nama
Ukuran
Permission
Aksi
AmigaOS.pm
982 B
chmod
View
DL
Edit
Rename
Delete
Cygwin.pm
3.53 MB
chmod
View
DL
Edit
Rename
Delete
Epoc.pm
1.53 MB
chmod
View
DL
Edit
Rename
Delete
Functions.pm
2.29 MB
chmod
View
DL
Edit
Rename
Delete
Mac.pm
21.75 MB
chmod
View
DL
Edit
Rename
Delete
OS2.pm
6.61 MB
chmod
View
DL
Edit
Rename
Delete
Unix.pm
15.52 MB
chmod
View
DL
Edit
Rename
Delete
Win32.pm
10.51 MB
chmod
View
DL
Edit
Rename
Delete
Edit file: /usr/lib64/perl5/vendor_perl/File/Spec/AmigaOS.pm
package File::Spec::AmigaOS; use strict; require File::Spec::Unix; our $VERSION = '3.78'; $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;
Simpan
Batal
Isi Zip:
Unzip
Create
Buat Folder
Buat File
Terminal / Execute
Run
Chmod Bulk
All File
All Folder
All File dan Folder
Apply