}
do nasty stuff;
...
my $foo = <<"}";