my $g_cmd="ssh Machinename ls <completefilepath>";
`$g_cmd`;
if($?)
{
	print "Error doesnot exist";
}
else
{
    $g_cmd="scp local_file remotehost:targetdirectory/remote_file";
    `$g_cmd`;
}