$h = $ARGV[0];
$b = $ARGV[1];

system("mv $h $b");

##</code><code>##

use File::Copy;

move($ARGV[0], $ARGV[1]);