Perl scripts for FunDial monitoring