$ perl -MExtUtils::MakeMaker -
print MM->new->quote_literal('-DMY_FORMAT="%.16e"')
__END__
Warning: Guessing NAME [Goner2] from current directory name.
-DMY_FORMAT=\"%.16e\"