Using *evaltclstring in globalpage.mac with double quotes inside

How can I use the *evaltclstring function in a globalpage.mac file in hypermesh when the tcl string inside it also has double quotes, such as,

 *evaltclstring('set t1 [string map {'\n\n' '\n'} $t1]; puts $t1;',0)

Any help is appreciated because the above command results in my hypermesh becoming unresponsive on startup.

Thank you.