#!/usr/bin/perl
my $var = <<HEREDOC;
i hate this
it's so awful
$blah blah blah
jiejgiejgiejge
HEREDOC
print $var . "\n";