#! /usr/bin/perl -w

use strict;

# I'll define this later
my $string1;

# some processing...
$string1 = 'message';

print "This is my text $string1\n";

