$VERSION = "2.10.13"; open NF, "$$cfg{'workdir'}${main::SL}$$rcfg{'directory'}{$router}$router.95"; $nf=; open (HTML,">$$cfg{'htmldir'}$$rcfg{'directory'}{$router}$router.$$rcfg{'extension'}{$router}") || do { warn ("WARNING: Writing $router.$$rcfg{'extension'}{$router}: $!"); next }; print HTML "\n"; print HTML '' . "\n"; print HTML "\n"; my $interval =$$cfg{'interval'} ? $$cfg{'interval'} : 5; my $expiration = &expistr($interval); my $refresh = $$cfg{'refresh'} ? $$cfg{'refresh'} : 300; my $namestring = &$LOC("the device"); print HTML <<"TEXT";