my $code_string = <<EOS;

... # your example here

EOS