use strict;
use warnings;

my $var = 5;
my $text = 'Variable $var';

print $text;