mamemomonga

#!/usr/bin/env perl
use strict;
use warnings;
use feature 'say';
use Time::HiRes 'usleep';

sub get_cpu_stat {
        my $stat='';
        open(my $fh,'<','/proc/stat') || die $!;
        local $/; $stat=<$fh>;

mamemomonga

名前解決できないWasabiを解決できる専用DNSサーバをDockerとdnsmasqでつくるメモ

ひとまず名前解決できたという感じ

設定とか

$ cat > resolv.dnsmasq.conf << 'EOS'
nameserver 8.8.8.8
nameserver 8.8.4.4
EOS

mamemomonga

ssh_configのホスト名を検索するツール

最近のssh clientでは ~/.ssh/config に Include conf.d/* とすることで、~/.ssh/conf.d 以下にユーザのconfigファイルを分離することができるようになった。 しかし、自分で設定したホストを憶えきれないので、検索するためのシンプルなシェルスクリプトを作成した。

ssh-hosts-find を引数なしで実行すると、一覧が表示される。引数をつけると、それをキーにしてgrepする

mamemomonga

Raspberry Pi3向け Debian10 aarch64 ビルドツール

こちらに移動しました

mamemomonga

terraform の出力をbash変数として利用する方法

jq, perlを使用する

main.tf の作成

$ cat > main.tf << 'EOS'
output env {
  value = {
    VALUE1 = "the value1"

mamemomonga

hoge.jsonの内容を整形

$ cat hoge.json | jq .
[
  {
    "id": 2,
    "name": "ゆかり"
  },
  {

mamemomonga

1998年、夏のカセットテープ

MixCloud

トラックリスト

番号	曲名	アーティスト	発売日
1	シーズン・イン・ザ・サン	Tube	1986年4月21日
2	夏の決心	大江千里	1994年8月1日

mamemomonga

# main.tf

# ------------------------
# 設定
# ------------------------
locals {
  # ドメイン
  domain = "hoge.example.org"

  # AWSプロファイル

mamemomonga

IFTTT CLI

IFTTT Webhookを実行するperlスクリプトです。追加モジュールは必要ありませんが、curlが必要です。

WEBHOOK_KEY に自分のWebHook Keyを(Webhook KeyはWebHook画面の「Documentation」から確認できます)、 COMMANDS に サブコマンドとイベントを設定します。イベントは複数設定でき、連続して実行されます。

mamemomonga

Jetson nano(Ubunutu)

テキストモードログイン
sudo systemctl set-default multi-user.target

ＧＵＩログイン
sudo systemctl set-default graphical.target

手動GUI起動
sudo systemctl start gdm3.service