One Hat Cyber Team
Your IP :
172.70.80.190
Server IP :
188.114.97.3
Server :
Linux thuru 6.5.11-4-pve #1 SMP PREEMPT_DYNAMIC PMX 6.5.11-4 (2023-11-20T10:19Z) x86_64
Server Software :
Apache/2.4.51 (Unix) OpenSSL/1.0.2k-fips
PHP Version :
7.3.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
perl5
/
DBM_Filter
/
Edit File:
int32.pm
package DBM_Filter::int32 ; use strict; use warnings; our $VERSION = '0.02'; # todo get Filter to figure endian. sub Store { $_ = 0 if ! defined $_ || $_ eq "" ; $_ = pack("i", $_); } sub Fetch { no warnings 'uninitialized'; $_ = unpack("i", $_); } 1; __END__ =head1 NAME DBM_Filter::int32 - filter for DBM_Filter =head1 SYNOPSIS use SDBM_File; # or DB_File, or GDBM_File, or NDBM_File, or ODBM_File use DBM_Filter ; $db = tie %hash, ... $db->Filter_Push('int32'); =head1 DESCRIPTION This DBM filter is used when interoperating with a C/C++ application that uses a C int as either the key and/or value in the DBM file. =head1 SEE ALSO L<DBM_Filter>, L<perldbmfilter> =head1 AUTHOR Paul Marquess pmqs@cpan.org
Simpan