$ cat <<HEREDOC
> blah blah
>
> blah blha
> HEREDOC
blah blah
                                                                                                                                    
blah blha
$ perl
print <<HEREDOC;
blah blha
                                                                                                                                    
blah blah
HEREDOC
^D
blah blha
                                                                                                                                    
blah blah
$