my $s = <<'EOS'; hello there test EOS