[ SYSTEM ]: Linux srv.persadacompanies.com 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
[ SERVER ]: Apache | PHP: 8.4.19
[ USER ]: persadamedika | IP: 45.64.1.108
GEFORCE FILE MANAGER
/
usr
/
lib64
/
perl5
/
UPLOAD:
NAME
SIZE
QUICK PERMS
ACTIONS
📁 B
SET
[ DEL ]
📁 CORE
SET
[ DEL ]
📁 Devel
SET
[ DEL ]
📁 File
SET
[ DEL ]
📁 Hash
SET
[ DEL ]
📁 I18N
SET
[ DEL ]
📁 IO
SET
[ DEL ]
📁 IPC
SET
[ DEL ]
📁 PerlIO
SET
[ DEL ]
📁 Sys
SET
[ DEL ]
📁 Tie
SET
[ DEL ]
📁 Time
SET
[ DEL ]
📁 asm
SET
[ DEL ]
📁 asm-generic
SET
[ DEL ]
📁 auto
SET
[ DEL ]
📁 bits
SET
[ DEL ]
📁 gnu
SET
[ DEL ]
📁 linux
SET
[ DEL ]
📁 machine
SET
[ DEL ]
📁 sys
SET
[ DEL ]
📁 vendor_perl
SET
[ DEL ]
📄 B.pm
31,457 B
SET
[ EDIT ]
|
[ DEL ]
📄 Config.pm
3,198 B
SET
[ EDIT ]
|
[ DEL ]
📄 Config.pod
256,889 B
SET
[ EDIT ]
|
[ DEL ]
📄 Config_git.pl
409 B
SET
[ EDIT ]
|
[ DEL ]
📄 Config_heavy.pl
56,655 B
SET
[ EDIT ]
|
[ DEL ]
📄 DynaLoader.pm
25,222 B
SET
[ EDIT ]
|
[ DEL ]
📄 Errno.pm
6,865 B
SET
[ EDIT ]
|
[ DEL ]
📄 Fcntl.pm
4,044 B
SET
[ EDIT ]
|
[ DEL ]
📄 GDBM_File.pm
1,551 B
SET
[ EDIT ]
|
[ DEL ]
📄 IO.pm
1,453 B
SET
[ EDIT ]
|
[ DEL ]
📄 NDBM_File.pm
2,500 B
SET
[ EDIT ]
|
[ DEL ]
📄 O.pm
4,208 B
SET
[ EDIT ]
|
[ DEL ]
📄 ODBM_File.pm
2,383 B
SET
[ EDIT ]
|
[ DEL ]
📄 Opcode.pm
15,893 B
SET
[ EDIT ]
|
[ DEL ]
📄 POSIX.pm
20,198 B
SET
[ EDIT ]
|
[ DEL ]
📄 POSIX.pod
73,705 B
SET
[ EDIT ]
|
[ DEL ]
📄 SDBM_File.pm
3,541 B
SET
[ EDIT ]
|
[ DEL ]
📄 _h2ph_pre.ph
29,256 B
SET
[ EDIT ]
|
[ DEL ]
📄 arybase.pm
2,816 B
SET
[ EDIT ]
|
[ DEL ]
📄 attributes.pm
16,929 B
SET
[ EDIT ]
|
[ DEL ]
📄 endian.ph
4,461 B
SET
[ EDIT ]
|
[ DEL ]
📄 features.ph
13,692 B
SET
[ EDIT ]
|
[ DEL ]
📄 lib.pm
6,006 B
SET
[ EDIT ]
|
[ DEL ]
📄 mro.pm
10,099 B
SET
[ EDIT ]
|
[ DEL ]
📄 ops.pm
997 B
SET
[ EDIT ]
|
[ DEL ]
📄 perllocal.pod
3,169 B
SET
[ EDIT ]
|
[ DEL ]
📄 re.pm
22,687 B
SET
[ EDIT ]
|
[ DEL ]
📄 signal.ph
3,381 B
SET
[ EDIT ]
|
[ DEL ]
📄 stdarg.ph
2,870 B
SET
[ EDIT ]
|
[ DEL ]
📄 stdc-predef.ph
840 B
SET
[ EDIT ]
|
[ DEL ]
📄 stddef.ph
12,372 B
SET
[ EDIT ]
|
[ DEL ]
📄 syscall.ph
86 B
SET
[ EDIT ]
|
[ DEL ]
📄 syslimits.ph
452 B
SET
[ EDIT ]
|
[ DEL ]
📄 syslog.ph
85 B
SET
[ EDIT ]
|
[ DEL ]
📄 wait.ph
83 B
SET
[ EDIT ]
|
[ DEL ]
DELETE SELECTED
[ CLOSE ]
EDIT: ODBM_File.pm
package ODBM_File; use strict; use warnings; require Tie::Hash; require XSLoader; our @ISA = qw(Tie::Hash); our $VERSION = "1.14"; XSLoader::load(); 1; __END__ =head1 NAME ODBM_File - Tied access to odbm files =head1 SYNOPSIS use Fcntl; # For O_RDWR, O_CREAT, etc. use ODBM_File; # Now read and change the hash $h{newkey} = newvalue; print $h{oldkey}; ... untie %h; =head1 DESCRIPTION C<ODBM_File> establishes a connection between a Perl hash variable and a file in ODBM_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<ODBM_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<"ODBM_File">. (Ths tells Perl to use the C<ODBM_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<odbm 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 ODBM 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