+ my $time = (stat($fh))[9];
+ close $fh;
+
+ print CGI->header(-type=>'text/json',
+ -x_remoteglot_last_modified=>$time,
+ -x_remoteglot_num_viewers=>$num_viewers,
+ -access_control_allow_origin=>'http://analysis.sesse.net',
+ -access_control_expose_headers=>'X-Remoteglot-Last-Modified, X-Remoteglot-Num-Viewers',
+ -expires=>'now');