From 239de739d538966ccb900eb391759b5e14b8a217 Mon Sep 17 00:00:00 2001
From: Marius Peter <dev@marius-peter.com>
Date: Fri, 3 Jul 2026 16:40:17 +0200
Subject: Add role for daq-node.

---
 roles/daq-node/bin/fapg-daq-node | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100755 roles/daq-node/bin/fapg-daq-node

(limited to 'roles/daq-node/bin')

diff --git a/roles/daq-node/bin/fapg-daq-node b/roles/daq-node/bin/fapg-daq-node
new file mode 100755
index 0000000..55a6d59
--- /dev/null
+++ b/roles/daq-node/bin/fapg-daq-node
@@ -0,0 +1,35 @@
+#!/usr/bin/env perl
+# -*- mode: perl-ts; -*-
+
+use 5.40.1;
+use strict;
+use warnings;
+
+use FindBin;
+use lib "${FindBin::Bin}/../lib/perl5";
+
+use FAPG::DAQ::EZO;
+
+=head1 NAME
+
+fapg-daq - read sensor data and send over MQTT
+
+=cut
+
+my $probe = FAPG::DAQ::EZO::identify_probe();
+
+print "Found probe "
+  . $probe->type
+  . " on "
+  . $probe->device
+  . ".\n";
+
+while (1) {
+  my $reading = $probe->get_reading();
+
+  print "Reading: " . $reading->value . " " . $reading->unit . "\n";
+
+  $reading->publish_mqtt();
+
+  sleep 5;
+}
-- 
cgit v1.2.3