use strict;

read_data_from_disk();
$SIG{HUP} = sub { write_data_to_disk(); exec $0; }

while 1 #deamon
[download]