#!/usr/bin/perl use strict; use warnings; package Test; my $string = "Hallo, Welt!\n" package main; print $string;