my($data) = @_;

##</code><code>##

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