Path::Class::File::Stat(3pm) User Contributed Perl Documentation Path::Class::File::Stat(3pm)NAME
Path::Class::File::Stat - cache and compare stat() calls on a Path::Class::File object
SYNOPSIS
use Path::Class::File::Stat;
my $file = Path::Class::File::Stat->new('path','to','file');
# $file has all the magic of Path::Class::File
# sometime later
if ($file->changed)
{
# do something provocative
}
DESCRIPTION
Path::Class::File::Stat is a simple extension of Path::Class::File. Path::Class::File::Stat is useful in long-running programs (as under
mod_perl) where you might have a file handle opened and want to check if the underlying file has changed.
METHODS
Path::Class::File::Stat extends Path::Class::File objects in the following ways.
use_md5
Calling this method will attempt to load Digest::MD5 and use that instead of stat() for creating file signatures. This is similar to how
File::Modified works.
changed
Returns the previously cached File::stat object if the file's device number and inode number have changed, or if the modification time or
size has changed.
Returns 0 (false) otherwise.
While File::Modified uses a MD5 signature of the stat() of a file to determine if the file has changed, changed() uses a simpler (and
probably more naive) algorithm. If you need a more sophisticated way of determining if a file has changed, use the restat() method and
compare the cached File::stat object it returns with the current File::stat object.
Example of your own changed() logic:
my $oldstat = $file->restat;
my $newstat = $file->stat;
# compare $oldstat and $newstat any way you like
Or just use File::Modified instead.
restat
Re-cache the File::stat object in the Path::Class::File::Stat object. Returns the previously cached File::stat object.
The changed() method calls this method internally if changed() is going to return true.
SEE ALSO
Path::Class, Path::Class::File, File::Signature, File::Modified
AUTHOR
Peter Karman, <karman@cpan.org>
COPYRIGHT AND LICENSE
Copyright (C) 2006 by Peter Karman
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-01-28 Path::Class::File::Stat(3pm)
Check Out this Related Man Page
MooseX::Types::Path::Class(3pm) User Contributed Perl Documentation MooseX::Types::Path::Class(3pm)NAME
MooseX::Types::Path::Class - A Path::Class type library for Moose
SYNOPSIS
package MyClass;
use Moose;
use MooseX::Types::Path::Class;
with 'MooseX::Getopt'; # optional
has 'dir' => (
is => 'ro',
isa => 'Path::Class::Dir',
required => 1,
coerce => 1,
);
has 'file' => (
is => 'ro',
isa => 'Path::Class::File',
required => 1,
coerce => 1,
);
# these attributes are coerced to the
# appropriate Path::Class objects
MyClass->new( dir => '/some/directory/', file => '/some/file' );
DESCRIPTION
MooseX::Types::Path::Class creates common Moose types, coercions and option specifications useful for dealing with Path::Class objects as
Moose attributes.
Coercions (see Moose::Util::TypeConstraints) are made from both 'Str' and 'ArrayRef' to both Path::Class::Dir and Path::Class::File
objects. If you have MooseX::Getopt installed, the Getopt option type ("=s") will be added for both Path::Class::Dir and
Path::Class::File.
EXPORTS
None of these are exported by default. They are provided via MooseX::Types.
Dir, File
These exports can be used instead of the full class names. Example:
package MyClass;
use Moose;
use MooseX::Types::Path::Class qw(Dir File);
has 'dir' => (
is => 'ro',
isa => Dir,
required => 1,
coerce => 1,
);
has 'file' => (
is => 'ro',
isa => File,
required => 1,
coerce => 1,
);
Note that there are no quotes around Dir or File.
is_Dir($value), is_File($value)
Returns true or false based on whether $value is a valid Dir or File.
to_Dir($value), to_File($value)
Attempts to coerce $value to a Dir or File. Returns the coerced value or false if the coercion failed.
DEPENDENCIES
Moose, MooseX::Types, Path::Class
BUGS AND LIMITATIONS
If you find a bug please either email the author, or add the bug to cpan-RT <http://rt.cpan.org>.
AUTHOR
Todd Hepler "<thepler@employees.org>"
LICENCE AND COPYRIGHT
Copyright (c) 2007-2008, Todd Hepler "<thepler@employees.org>".
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.
perl v5.10.1 2008-07-09 MooseX::Types::Path::Class(3pm)