Help for this page
sub get_sensor_id($) { my ($sensor) = @_; print "sensor input: $sensor\n"; return 0; }
$value =~ s/^\s+|\s+$//g;