aDriv4 website!

Linux web1060.sh.fuk1 4.18.0-425.19.2.lve.el7h.x86_64 #1 SMP Thu Apr 6 13:40:55 UTC 2023 x86_64
Apache
127.0.0.1

File Name : Sync.pm

# File::Sync.pm
#
# Copyright � 1997,1999 Carey Evans.  All rights reserved.  This module is
# free software; you can redistribute it and/or modify it under the same
# terms as Perl itself.

package File::Sync;

use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);

require Exporter;
require DynaLoader;
require AutoLoader;

use Carp;
use Symbol qw(qualify_to_ref);

@ISA = qw(Exporter DynaLoader);
# Items to export into callers namespace by default.
@EXPORT = ();
@EXPORT_OK = qw(
	sync
   fdatasync
	fsync
   fdatasync_fd
	fsync_fd
);
$VERSION = '0.11';

bootstrap File::Sync $VERSION;

# Preloaded methods go here.

# Interface from Perl filehandle to POSIX file descriptor.
sub fsync(*) {
    @_ == 1 or croak "usage: fsync FILEHANDLE";

fsync_fd(fileno(qualify_to_ref($_[0], caller())));
}

sub fdatasync(*) {
    @_ == 1 or croak "usage: fdatasync FILEHANDLE";

fdatasync_fd(fileno(qualify_to_ref($_[0], caller())));
}

## Make fsync available as a method of FileHandle
*FileHandle::fsync = \&fsync;
# note: we no longer clobber IO::Handle::fsync. see POD for more.

1;
__END__

=head1 NAME

File::Sync - Perl access to fsync() and sync() function calls

=head1 SYNOPSIS

use File::Sync qw(fsync sync);
  sync();
  fsync(\*FILEHANDLE) or die "fsync: $!";
  # and if fdatasync() is available on your system:
  fdatasync($fh) or die "fdatasync: $!";

use File::Sync qw(fsync);
  use FileHandle;
  $fh = new FileHandle("> /tmp/foo") 
      or die "new FileHandle: $!";
  ...
  $fh->fsync() or die "fsync: $!";

=head1 DESCRIPTION

The fsync() function takes a Perl file handle as its only argument, and
passes its fileno() to the C function fsync().  It returns I<undef> on
failure, or I<true> on success. fdatasync() is identical in return value,
but it calls C fdatasync() instead of fsync(), synchronizing only the
data in the file, not the metadata.

The fsync_fd() function is used internally by fsync(); it takes a file
descriptor as its only argument.

The sync() function is identical to the C function sync().

This module does B<not> export any methods by default, but fsync()
is made available as a method of the I<FileHandle> class. Note carefully
that as of 0.11, we no longer clobber anything in I<IO::Handle>. You
can replace any calls to IO::Handle::fsync() with IO::Handle::sync():
  https://rt.cpan.org/Public/Bug/Display.html?id=50418

=head1 NOTES

Doing fsync() if the stdio buffers aren't flushed (with C<$|> or the
I<autoflush> method) is probably pointless.

Calling sync() too often on a multi-user system is slightly antisocial.

=head1 AUTHOR

Carey Evans <I<c.evans@clear.net.nz>>

=head1 SEE ALSO

perl(1), fsync(2), sync(2), perlvar(1)

=cut

Name	Type	Size	Owner/Group	Permission	Last Modified	Actions
.	dir	-	root/root	0755	2023-08-25 11:53:16
..	dir	-	root/root	0755	2026-01-21 04:52:00
FcntlLock	dir	-	root/root	0755	2023-08-25 11:52:57
RsyncP	dir	-	root/root	0755	2023-08-25 11:53:16
Spec	dir	-	root/root	0755	2023-08-25 09:26:15
FcntlLock.pm	text/plain	1.71 KB	root/root	0644	2014-07-31 08:10:14
FcntlLock.pod	text/plain	10.47 KB	root/root	0644	2014-05-27 02:26:08
LibMagic.pm	text/plain	7.94 KB	root/root	0644	2013-09-02 07:13:42
Map.pm	text/plain	15.58 KB	root/root	0644	2014-02-17 01:54:33
RsyncP.pm	text/plain	62.23 KB	root/root	0644	2015-01-18 01:02:39
Spec.pm	text/plain	10.24 KB	root/root	0644	2013-01-16 06:28:15
Sync.pm	text/plain	2.63 KB	root/root	0644	2011-11-19 07:48:08

For more Private tool come to me!

https://t.me/aDriv4vz