replace META-INF/MANIFEST.MF? [y]es, [n]o, [A]ll, [N]one, [r]ename:

##</code><code>##

find( {
    wanted => \&wanted,
}, @dirs);


sub wanted {
    my $depth = $File::Find::dir =~ tr[/][];
    return if $depth < $min_depth;
 if ( $File::Find::name =~ m/.zip$|file.*?$/ ) {
       print "I am extracting zip file : $File::Find::name\n";
        &execute_command("unzip $File::Find::name");
     #At this point it asks for prompt,i need to make it accept reply automatically.
     #execute_command is a subroutine written in another module which uses fork and exec to execute a shell command.   
    elsif ( $File::Find::name =~ m/.gz$/ ) {
        &execute_command("gunzip $File::Find::name");
     }
}