電子ペーパーに天気予報を表示します。ラズベリーパイでインターネットから天気予報データを取得して、電子ペーパーに天気予報を表示します。データはひとくち予報 in Feedから使用させていただいてます。
#!/usr/bin/perl # -*- coding: utf-8 -*- $url = (@ARGV == 1) ? $ARGV[0] : "http://feedproxy.google.com/hitokuchi_5210"; #表示したい地域のURL $incmd = "wget -O - $url"; open(IN, "$incmd|") || die; $outcmd = <<'EOS'; wkhtmltopdf -l --zoom 0.75 --encoding UTF-8 -B 0 -L 0 -R 0 -T 0 -g - - | pdftoppm | convert - -crop 200x96+8+8 -threshold 50000 -colors 2 bmp:- | cu --nostop -E '' -s 115200 -l /dev/ttyAMA0 EOS open(OUT, "|$outcmd") || die; while (<IN>) { last if m|の週間予報</h3>|; } while (<IN>) { last if m/]]/; s/border="1"/border="0"/; print OUT; } close(OUT); exit;