my $x = <<~ FOO;
bar
FOO