请教熟手们解答！！

＃！/usr/bin/perl -w

$string = 'HHUYTHYHYUHHU';
$result = H_to_R($string);
print "I changed all the H's in $string to R's and got $result\n\n";

sub H_to_R{
    my($input) = @_;
    my($string) = $input;
    $string =~ s/H/R/g;
    return $string;
}

这段代码本人已经运行过，能正常运行，不过就是对其中两行不懂，请高手指点：
my($input) = @_;
my($string) = $input;


为何要这样才能实现程序呢？谢谢！！