http://www.perlmonks.org?node_id=538032


in reply to tar help

The ptar perl script which comes with Archive::Tar shows you how to do this using File::Find. Relevant fragment:

if( $opts->{c} ) {
    my @files;
    find( sub { push @files, $File::Find::name;
                print $File::Find::name.$/ if $verbose }, @ARGV );

    Archive::Tar->create_archive( $file, $compress, @files );
    exit;
}

[download]
The intelligent reader will judge for himself. Without examining the facts fully and fairly, there is no way of knowing whether vox populi is really vox dei, or merely vox asinorum. — Cyrus H. Gordon

Replies are listed 'Best First'.
Re^2: tar help
by snyder (Initiate) on Mar 21, 2006 at 21:00 UTC
    This looks like the path that will get me where I am trying to go. Thank you for your attention on this matter. For the record, I have a shell script to make the tarball and I have a script in ColdFusion to create the tarball and FTP it. I am attempting to learn some perl and that is why I am trying to write a script for something I have accomplished in another language. Expanding my knowledge with a point of reference.
[reply]

In Section Seekers of Perl Wisdom