my $c = 5;
my $d = $c;
$d = 6;