Trophie

['Trophie',
  \&ask_daemon, ["{}/\n", '/var/run/trophie'],
  qr/(?x)^ 0+ ( : | [\000\r\n]* $)/m,  qr/(?x)^ 1 ( : | [\000\r\n]* $)/m,
  qr/(?x)^ [-+]? \d+ : (.*?) [\000\r\n]* $/m ],