my $name = "Raimo";
print "$name\n";
{
print "My name is $name\n";
my $name = "my name";
print "Now name is $name\n";
my $love = "another name";
print "My love is $love.\n";
}
print "$name is back.\n";
print "$love.\n";