Perhaps you want the output from the scp command rather than the exit code? You might get better results using backticks.

Traditionally, I've used Net::SSH's sshopen3 and Net:SCP's put to solve this problem.