If you choose to use this familiarise yourself with ssh, and the Net::SSH::Perl documentation, the README shows you where sample/tutorial scripts live within the distribution.

Just use the cd command with your path and navigate to your path and do untar

my($stdout, $stderr, $exit) = $ssh->cmd("cd $path");
($stdout, $stderr, $exit) = $ssh->cmd("untar tar.gz");
[download]

Hi Vinoth,

my $ssh = Net::SSH::Perl->new($host);
$ssh->login($user, $password);
my($stdout, $stderr, $exit) = $ssh->cmd("cd testing");
($stdout, $stderr, $exit) = $ssh->cmd("unzip wwww.zip");
[download]

This one i used. But file unzipped in home directory only not unzipped inside testing folder.. Any Worng....

I suggest you read the documentation and scripts I previous linked to, check for errors, enable debugging. Use code tags when posting code/data, as suggested each time you post. If you're new here read PerlMonks for the Absolute Beginner and How do I post a question effectively?.

As suggested by marto just print

print "$stdout\n"; 
print "$stderr\n";
print "$exit\n";
[download]

after

my($stdout, $stderr, $exit) = $ssh->cmd("cd testing");