$key = 'something';
print '$key', "\n";
print "$key", "\n";
print $key, "\n";
__END__
$key
something
something
[download]

See interpolate in perlintro