use strict;
use warnings;

my $var1 = 'one';
my $var12 = 'twelve';

print "$var12\n";   # prints 'twelve'
print "${var1}2\n"; # prints 'one2'