+my $stats = $m->cache->get("stats");
+if (defined $stats) {
+ print "<h2>Reusing cached result</h2>\n";
+ print "stats=$stats\n";
+} else {
+ print "<h2>Recalculating stats</h2>\n";
+ $stats = new ZOOM::IRSpy::Stats("localhost:3313/IR-Explain---1");
+ $m->cache->set("stats", $stats, "1 minute");
+}