#! /usr/bin/perl -w

use strict;

my $string1 = 'some text';
print "This is my text $string1\n";

