Help for this page
push(@{${$key}[0]},1,33); push(@{${$key}[0]},22,11); push(@{${$key}[1]},2,5); push(@{${$key}[2]},3,4);
#!/usr/bin/perl use strict; ... $chart->plot( $days{$c} ); MainLoop;