Hackfut Security File Manager
Current Path:
/usr/lib64/perl5
usr
/
lib64
/
perl5
/
📁
..
📁
5.10.0
📁
B
📄
B.pm
(25.1 KB)
📁
CORE
📁
Compress
📄
Config.pm
(2.68 KB)
📄
Config.pod
(221.26 KB)
📄
Config_git.pl
(409 B)
📄
Config_heavy.pl
(38.48 KB)
📄
Cwd.pm
(20.67 KB)
📄
DB_File.pm
(62.05 KB)
📁
Data
📁
Devel
📁
Digest
📄
DynaLoader.pm
(24.45 KB)
📁
Encode
📄
Encode.pm
(29.03 KB)
📄
Errno.pm
(7.47 KB)
📄
Fcntl.pm
(5.32 KB)
📁
File
📁
Filter
📄
GDBM_File.pm
(1.78 KB)
📁
Hash
📁
I18N
📁
IO
📄
IO.pm
(1.37 KB)
📁
IPC
📁
JSON
📁
List
📁
MIME
📁
Math
📄
NDBM_File.pm
(2.46 KB)
📄
O.pm
(4.11 KB)
📄
Opcode.pm
(15.13 KB)
📄
POSIX.pm
(20.52 KB)
📄
POSIX.pod
(57.25 KB)
📁
PerlIO
📄
SDBM_File.pm
(2.46 KB)
📁
Scalar
📄
Socket.pm
(9.75 KB)
📄
Storable.pm
(40.03 KB)
📁
Sub
📁
Sys
📁
Text
📁
Time
📁
Unicode
📄
XSLoader.pm
(10.28 KB)
📄
_h2ph_pre.ph
(11.18 KB)
📁
asm
📁
asm-generic
📄
attrs.pm
(1.4 KB)
📁
auto
📁
bits
📄
encoding.pm
(19.43 KB)
📄
endian.ph
(4.06 KB)
📄
features.ph
(13.01 KB)
📁
gnu
📄
lib.pm
(6.69 KB)
📁
linux
📁
machine
📄
mro.pm
(10.84 KB)
📄
ops.pm
(997 B)
📄
perllocal.pod
(11.11 KB)
📄
re.pm
(14.47 KB)
📄
signal.ph
(4.02 KB)
📄
stdarg.ph
(2.88 KB)
📄
stddef.ph
(11.33 KB)
📁
sys
📄
syscall.ph
(86 B)
📄
syslimits.ph
(454 B)
📄
syslog.ph
(85 B)
📁
threads
📄
threads.pm
(33.58 KB)
📄
time.ph
(4.49 KB)
📁
vendor_perl
📁
version
📄
version.pm
(3.47 KB)
📄
version.pod
(9.6 KB)
📄
wait.ph
(83 B)
📄
xlocale.ph
(156 B)
Editing: SDBM_File.pm
package SDBM_File; use strict; use warnings; require Tie::Hash; use XSLoader (); our @ISA = qw(Tie::Hash); our $VERSION = "1.06"; XSLoader::load 'SDBM_File', $VERSION; 1; __END__ =head1 NAME SDBM_File - Tied access to sdbm files =head1 SYNOPSIS use Fcntl; # For O_RDWR, O_CREAT, etc. use SDBM_File; tie(%h, 'SDBM_File', 'filename', O_RDWR|O_CREAT, 0666) or die "Couldn't tie SDBM file 'filename': $!; aborting"; # Now read and change the hash $h{newkey} = newvalue; print $h{oldkey}; ... untie %h; =head1 DESCRIPTION C<SDBM_File> establishes a connection between a Perl hash variable and a file in SDBM_File format;. You can manipulate the data in the file just as if it were in a Perl hash, but when your program exits, the data will remain in the file, to be used the next time your program runs. Use C<SDBM_File> with the Perl built-in C<tie> function to establish the connection between the variable and the file. The arguments to C<tie> should be: =over 4 =item 1. The hash variable you want to tie. =item 2. The string C<"SDBM_File">. (Ths tells Perl to use the C<SDBM_File> package to perform the functions of the hash.) =item 3. The name of the file you want to tie to the hash. =item 4. Flags. Use one of: =over 2 =item C<O_RDONLY> Read-only access to the data in the file. =item C<O_WRONLY> Write-only access to the data in the file. =item C<O_RDWR> Both read and write access. =back If you want to create the file if it does not exist, add C<O_CREAT> to any of these, as in the example. If you omit C<O_CREAT> and the file does not already exist, the C<tie> call will fail. =item 5. The default permissions to use if a new file is created. The actual permissions will be modified by the user's umask, so you should probably use 0666 here. (See L<perlfunc/umask>.) =back =head1 DIAGNOSTICS On failure, the C<tie> call returns an undefined value and probably sets C<$!> to contain the reason the file could not be tied. =head2 C<sdbm store returned -1, errno 22, key "..." at ...> This warning is emitted when you try to store a key or a value that is too long. It means that the change was not recorded in the database. See BUGS AND WARNINGS below. =head1 BUGS AND WARNINGS There are a number of limits on the size of the data that you can store in the SDBM file. The most important is that the length of a key, plus the length of its associated value, may not exceed 1008 bytes. See L<perlfunc/tie>, L<perldbmfilter>, L<Fcntl> =cut
Upload File
Create Folder