Exec command on PC when temp is too high (perl)