The problem is that "find" is going to look into that "archive" directory which is in the target directory.
If you look in there, you should see the file IMF_ATRPU_12022010114110.csv.
And your code is treating that like it is in target dir.
Since target dir has nothing but files and that one directory, you could start out with something like
Unfortunately, this will also place the target dir (ATRPU) in the list of files. I'm not sure how to get rid of this with the find command but you should be able to easily account for this within the body of the for loop or within the archive_file function.
Hi All,
I am very new to the UNIX world and find myself in a new position at work that requires me to archive large CADD files based in both UNIX and Windows environments on CD's. I have one engineer that wants to export these files as a table (I guess) and it appears to have a lot of paper... (2 Replies)
hi all i have a requirement where in i have to zip all the files with "*.bkp" after 14 days and move the zip files to Archive directory ....
i am able to achieve the first functionality but not able to achive the second one ...here is my code
find ${LOG_DIR} -name "*.bkp" -mtime +14 | xargs -i... (1 Reply)
Hello All.
I have problem archiving files.
The problem is:)
I have about 10000 files in one directory, all this file aproximately the same size, i need to gzip them and write on DVD. But all this files take about 15 GB of space (already gzipped). So i need DVD Blue-Ray :p or i need to split... (3 Replies)
Hi,
Suppose I have 2 files of yesterday's. And today I have received 3 files.
Before processing anything I want to archieve the 2 files of yesterday's into a different folder.
How can this be done?
Regards,
Sunitha (1 Reply)
Hi All,
I have tried so many command but none work like i wanted.
I would like archive which i assume it will move the files and archive it somewhere.
for example:
if i have a folder and files:
/home/blah/test
/home/blah/hello
/home/blah/foo/bar
i would like to archive folder... (6 Replies)
Hi,
In our current process we are reading the file, (which is placed by external vendor)from one particular folder and processing those files
through ETL(informatica). We are reading these file as " ls -ltr *.txt"
Once the process is finish these files are moved to archived script by "mv"... (1 Reply)
HI ,
I have a file abc.txt, which has some .csv files listed.
example.
abc.txt
1.csv
2.csv
3.csv
4.csv
5.csv
I want to move all the files listed in abc.txt to a archive directory,and zip the moved files.
Can anyone help me with the script.
Thanks,sai (1 Reply)
Hello Group,
I would request your help to build a shell script in order to find files older than 90 days then create the same directory structure under the second disk (/archive directory) and move the file preserving the same timestamps (ownership, etc).
Also keep the log of files moved... (4 Replies)
hi,
Am trying to acrhive a bunch of files on some ftp site and somehow managed to come out with the below logic.
I'm getting "syntax error: unexpected end of file" error. Interestingly this below snipeet works fine if run for the first time but the subsequent runs fail!
Anybody has any idea... (3 Replies)
Dear Team,
I am looking for transferring files to and from the local and remote servers using SFTP commands. Currently the script is using the mget and mput commands to do the copying of the files. While I am trying to move the files from local to remote server, I would also like to archive... (21 Replies)
Discussion started by: Rads
21 Replies
LEARN ABOUT DEBIAN
archive::any
Archive::Any(3pm) User Contributed Perl Documentation Archive::Any(3pm)NAME
Archive::Any - Single interface to deal with file archives.
SYNOPSIS
use Archive::Any;
my $archive = Archive::Any->new($archive_file);
my @files = $archive->files;
$archive->extract;
my $type = $archive->type;
$archive->is_impolite;
$archive->is_naughty;
DESCRIPTION
This module is a single interface for manipulating different archive formats. Tarballs, zip files, etc.
new
my $archive = Archive::Any->new($archive_file);
my $archive = Archive::Any->new($archive_file, $type);
$type is optional. It lets you force the file type in-case Archive::Any can't figure it out.
extract
$archive->extract;
$archive->extract($directory);
Extracts the files in the archive to the given $directory. If no $directory is given, it will go into the current working directory.
files
my @file = $archive->files;
A list of files in the archive.
mime_type
my $mime_type = $archive->mime_type();
Returns the mime type of the archive.
is_impolite
my $is_impolite = $archive->is_impolite;
Checks to see if this archive is going to unpack into the current directory rather than create its own.
is_naughty
my $is_naughty = $archive->is_naughty;
Checks to see if this archive is going to unpack outside the current directory.
DEPRECATED
type
my $type = $archive->type;
Returns the type of archive. This method is provided for backwards compatibility in the Tar and Zip plugins and will be going away
soon in favor of "mime_type".
PLUGINS
For detailed information on writing plugins to work with Archive::Any, please see the pod documentation for Archive::Any::Plugin.
AUTHOR
Clint Moore <cmoore@cpan.org>
AUTHOR EMERITUS
Michael G Schwern
SEE ALSO
Archive::Any::Plugin
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Archive::Any
You can also look for information at:
o AnnoCPAN: Annotated CPAN documentation
<http://annocpan.org/dist/Archive-Any>
o CPAN Ratings
<http://cpanratings.perl.org/d/Archive-Any>
o RT: CPAN's request tracker
<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Archive-Any>
o Search CPAN
<http://search.cpan.org/dist/Archive-Any>
LICENSE
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See <http://www.perl.com/perl/misc/Artistic.html>
perl v5.10.0 2008-06-25 Archive::Any(3pm)