KZGJIGRNWHWPBN45NTLPTZKZ266FFCO7JLBJBA6BTG4TJDORNIFQC
(bye) ) )
(de frutify ()
(let
(Now
(call
'bash
'-c
"https --check-status --follow https://frutify.eu/lv > /dev/null")
Was (rc DB 'frutify))
(if2 Was Now
NIL
(mail "localhost" 25 "mpech@envs.net" (quote "mpech@envs.net") "frutify down")
(mail "localhost" 25 "mpech@envs.net" (quote "mpech@envs.net") "frutify up") )
(rc DB 'frutify Now)