Skip to content

Instantly share code, notes, and snippets.

@secbyd
secbyd / check.pl
Last active July 24, 2023 13:12
Query database for current price and update FHEM accordingly
#!/usr/bin/perl -l
use strict;
use warnings;
use DBI;
use Net::Telnet;
my $dbName="electricity";
my $dbUser="********";
my $dbPass="********";
my $dbHost="127.0.0.1";
@secbyd
secbyd / collect.pl
Last active July 24, 2023 13:14
Script to retrieve hourly electricity prices in NL
#!/usr/bin/perl -l
use strict;
use warnings;
use LWP::UserAgent;
use JSON;
use POSIX qw(strftime);
use Time::Local;
use DBI;
@secbyd
secbyd / MultiRoom.sh
Created April 8, 2018 07:18 — forked from fhatz/MultiRoom.sh
Samsung Multiroom - Console client
#! /bin/bash
# Author: F. Hatz
# based on 'https://github.com/bacl/WAM_API_DOC'
# start with MultiRoom.sh search (search for speakers)
# or with MultiRoom.sh Speaker-IP UUID OBJECTID [OBJECTID OBJECTID ...] volume
# or with MultiRoom.sh Speaker-IP fav1/fav2/fav3/radio1/radio2/radio3 volume
# or with MultiRoom.sh Speaker-IP play/pause/stop (song: play/pause radio: stop)
# or with MultiRoom.sh Speaker-IP next/previous
# or with MultiRoom.sh Speaker-IP mute on/off
@secbyd
secbyd / keybase.md
Last active September 19, 2018 14:28

Keybase proof

I hereby claim:

  • I am secbyd on github.
  • I am secbyd (https://keybase.io/secbyd) on keybase.
  • I have a public key ASA_h7NswdYx9kdo6I-qj8zyphfVaBG0xQOoFS2nCo9F5Qo

To claim this, I am signing this object: