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

{ my $string = "Hallo, Welt!\n" }
print $string;