my $var = <<'__EOI__';
...
...
__EOI__