1#!/usr/local/bin/perl 2# Hide one webmin.com notification 3 4require './webmin-lib.pl'; 5our ($hidden_announce_file, %in); 6&ReadParse(); 7 8&lock_file($hidden_announce_file); 9&read_file($hidden_announce_file, \%hide); 10$hide{$in{'id'}} = 1; 11&write_file($hidden_announce_file, \%hide); 12&unlock_file($hidden_announce_file); 13 14&redirect("/"); 15