/apps/webroot/service/servicelist/ss/filename.blah


##</code><code>##

/servicelist/ss/filename.blah

##</code><code>##

    my $tar = Archive::Tar->new();
    foreach $updatedFile (@updatedFiles){
        print "Adding to tar ($updatedFile)\n";
	$tar->add_files("$updatedFile");
    }
    foreach $newFile (@newFiles){
        print "Adding to tar ($newFile)\n";
        $tar->add_files("$newFile");
    }
    $tar->write("$tarFile");