Thanks to all ... jwm
-----Original Message----- From: David Gray [mailto:[EMAIL PROTECTED]] Sent: August 16, 2002 09:08 To: 'Moon, John' Cc: [EMAIL PROTECTED] Subject: RE: perl module problem > A perl-javascript question (?) :) > > I sometime code javascript in my scripts like: > > my $script=<<EOS; > function foo { > alert('message from foo\\n'); > } > EOS > > then do : > > print $q->start_html(-script=>'$script'); > > But this requires the "escapes" have to be "escaped" ... Does > anyone have an alternative... IS there a "switch" in perl to > "handle" this ? You could do: my $script =<<'EOS'; function foo { alert('message from foo\n'); } EOS Which forces the 'here document' to be a single-quoted string. The downside of this is that it is a single-quoted string, so you can't interpolate variables, which sort of defeats the purpose of writing out javascript from perl to begin with. HTH, -dave
