$num1 =$a; $num2=$b; #### my $a=$num1; my $b=$num2;