#!/usr/bin/perl

my $var = <<HEREDOC;
i hate this
   it's so awful
   $blah blah blah
jiejgiejgiejge
HEREDOC

print $var . "\n";