#!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';

Hello

HTML