Select Code to Download

use Archive::Tar;
use strict;
...
$parent->remove("file2");
$parent->write("child2.tar");

$ echo "contents of file1">file1
$ echo "contents of file2">file2
...
contents of file2
contents of file3
contents of file4