#!/usr/bin/perl
use warnings;
use strict;

my $string = "Hallo";
{ my $string = "Welt"; }