my $x = 10;
print $x, "\n";

my ($y) = 10;
print $y, "\n";

--output:--
10
10