I have a problem handling an archive from within Perl (under Windows 7)
I have an archive and want to add a few files. The files to add are in a subdir which resides in $archivedir. The list of files is in @filelist (path relative to $archivedir). When I run it it creates arch.cpio.new but it remains empty and gives messages that it cannot find the files to add:
/tttest/cpio: test/1: Cannot stat: No such file or directory /tttest/cpio: test/2: Cannot stat: No such file or directory /tttest/cpio: test/3: Cannot stat: No such file or directory 1 block
The files are there...
Any suggestions?
Thank you.
My code: chdir($archivedir); my ($WRITEME); my $program= "| \"$bindir/cpio\" -o -O arch.cpio.new "; my $pid = open( $WRITEME, $program); binmode $WRITEME; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<solution foreach my $f (@filelist){print $WRITEME "$f\n";} close($WRITEME);
In reply to perl, cpio, and pipe by momo33
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |