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