my $var = test';
my $result = "This is a '$var' again";
print "$result\n";