File::Find::Rule::Ext2::FileAttributes - rules to match on Ext2::FileAttributes

File-Find-Rule-Ext2-FileAttributes documentation Contained in the File-Find-Rule-Ext2-FileAttributes distribution.

Index

Code Index:

NAME

Top

File::Find::Rule::Ext2::FileAttributes - rules to match on Ext2::FileAttributes

SYNOPSIS

Top

use File::Find::Rule::Ext2::FileAttributes;

my @immutable = File::Find::Rule->immutable->in( '.' ); print "@immutable\n";

my @appendable = File::Find::Rule->appendable->in( '.' ); print "@appendable\n";

DESCRIPTION

Top

File::Find::Rule::Ext2::FileAttributes wraps the Linux::Ext2::FileAttributes module and allows you to filter files by the immutable or appendable extended attributes using File::Find::Rule.

METHODS

Top

immutable

This method filters on the immutable flag. If this flag is set on a file even root cannot change the files content or unlink it without first removing the flag.

appendable

This method filters on the append only flag. If this flag is set on a file then its contents can be added to but not removed unless the flag is first removed.

AUTHOR

Top

Dean Wilson <dean.wilson@gmail.com> http://www.unixdaemon.net

LICENCE AND COPYRIGHT

Top

Copyright 2008 Dean Wilson. All Rights Reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Top

File::Find::Rule, Linux::Ext2::FileAttributes

File-Find-Rule-Ext2-FileAttributes documentation Contained in the File-Find-Rule-Ext2-FileAttributes distribution. 
package File::Find::Rule::Ext2::FileAttributes;
use strict;
use warnings;
use File::Find::Rule;
use Linux::Ext2::FileAttributes;

use base qw( File::Find::Rule );
use vars qw( $VERSION @EXPORT );

@EXPORT  = @File::Find::Rule::EXPORT;
$VERSION = '0.02';



sub File::Find::Rule::immutable () {
  my $self = shift()->_force_object;
  $self->exec( sub { is_immutable( $_ ) } );
}

sub File::Find::Rule::appendable () {
  my $self = shift()->_force_object;
  $self->exec( sub { is_append_only( $_ ) } );
}


1;


__END__