NAME

File::System::Passthrough - A file system module that delegates work to another

Back to Top

SYNOPSIS

  package File::System::MyModule;

  use strict;
  use base 'File::System::Passthrough';

  # You now have all methods available, just define those you must.

Back to Top

DESCRIPTION

This module is pretty useless on it's own. It simply delegates all the real work to an internal wrapped module. It shouldn't be used directly. However, I've found that many of the special modules written are used to wrap others and this provides the basic functionality.

SUBCLASSING

Basically, you can just declare the File::System::Passthrough manpage as your base class and be done. You can define as many or few other methods as you prefer. You can refer to the wrapped class like so:

  sub my_method {
      my $self = shift;
      my $wrapped_fs = $self->{fs};

      # ...
  }

As of this writing, no other key in the $self hash is used, so you can manipulate the other keys as you wish.

ADDITIONAL API

$obj = File::System->new('Passthrough', $wrapped_obj)

The constructor takes either a decendent of the File::System::Object manpage or a reference to an array that can be used to construct such an object in $wrapped_obj.

Back to Top

SEE ALSO

the File::System manpage, the File::System::Object manpage

Back to Top

AUTHOR

Andrew Sterling Hanenkamp, <hanenkamp@users.sourceforge.net>

Back to Top

COPYRIGHT AND LICENSE

Copyright 2005 Andrew Sterling Hanenkamp. All Rights Reserved.

This software is distributed and licensed under the same terms as Perl itself.

Back to Top