NAME

Net::SFTP::Foreign::Tempdir::Extract::File - Path::Class::File with an extract method

SYNOPSIS

use Net::SFTP::Foreign::Tempdir::Extract;
my $sftp=Net::SFTP::Foreign::Tempdir::Extract->new(user=>$user, match=>qr/\.zip\Z/);
my $file=$sftp->next; # isa Net::SFTP::Foreign::Tempdir::Extract::File

DESCRIPTION

Net::SFTP::Foreign::Tempdir::Extract::File is a convince wrapper around Path::Class, Archive::Zip and File::Tempdir

USAGE

my $archive = Net::SFTP::Foreign::Tempdir::Extract::File->new( $path, $filename );
my @files = $archive->extract; #array of Net::SFTP::Foreign::Tempdir::Extract::File files

extract

Extracts Zip files to temporary directory

my @files = $archive->extract; #array of Net::SFTP::Foreign::Tempdir::Extract::File files
my $files = $archive->extract; #array reference of Net::SFTP::Foreign::Tempdir::Extract::File files

Note: The file is temporary and will be cleaned up when the variable goes out of scope.

TODO

Support other archive formats besides zip

BUGS

Send email to author and log on RT.

SUPPORT

DavisNetworks.com supports all Perl applications including this package.

AUTHOR

Michael R. Davis
CPAN ID: MRDVT
Satellite Tracking of People, LLC
mdavis@stopllc.com
http://www.stopllc.com/

COPYRIGHT

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

The full text of the license can be found in the LICENSE file included with this module.

SEE ALSO

File::Tempdir, Archive::Zip