Re: jquery scripts

In your templating system, have the positions interpolate as a string instead of using a literal variable $mydata. If you can show us a (tiny) example script that does what you describe, we can likely point out better what you need to change.

Basically, I imagine your script being:

#!perl -w
use strict;

my $mydata = "[[0,170],[1,27],[2,3],[3,0],[4,0],[5,0],[6,0],[7,0],[8,0
+],[9,0],[10,0]]";

print <<'HTML';
<html>
<head>
<script src="jquery.js"></script>
<script>
var data=$mydata;
</script>
</head>
<body>
<h1>Hello</h1>

</body>
HTML
[download]

In that case, the easiest approach would be to change the interpolation to double quotes.

The best approach is to use a proper templating system like HTML::Template or Template::Toolkit.

Comment on Re: jquery scripts Select or Download Code

Replies are listed 'Best First'.
Re^2: jquery scripts by choroba (Cardinal) on Oct 02, 2015 at 09:34 UTC
Or, if your data are stored in an array in Perl, use a JSON module to convert them to JSON: `my @mydata = map [ $i++, $_ ], 170, 27, 3, (0) x 8; my $json = to_json(\@mydata); print << "HTML"; <html> <head> <script src="jquery.js"></script> <script> var data=$json; </script> </head> <body> <h1>Hello</h1> </body> HTML` [download] لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ	[reply] [d/l]