end0tknr's kipple - 新web写経開発

http://d.hatena.ne.jp/end0tknr/ から移転します

apache commons configuration for java で INI file を load / read

http://commons.apache.org/proper/commons-configuration/ ini形式の設定ファイルをloadする必要があったので、探したら、見かけた。 ※ini以外にも、 .xmlや .properties 等に対応しているようです。 ( 一方で、.json や、.yaml には対応していません ) pac…

echonet-liteのNODEとOBJECT

当初、NODE = ルータ(ゲートウェイ) と理解していましたが、次のような理解が正しそう

pythonで socket + udp通信し、echonet機器一覧を探索

以下、何となく書いて、何となく、動いた程度。 何となくpythonで書いてみたけど、javaでも書くかな? (気が向いたら) #!/usr/local/bin/python ## for python 2.7 # -*- coding: utf-8 -*- import asyncore import codecs import netifaces import socket im…

ソフトウエア取得/改修に伴う 資産計上 or 経費処理 - 7-8-6の2 (ソフトウエアに係る資本的支出と修繕費)

国税庁が公開する 基本通達・法人税法 の 7-8-6の2 (ソフトウエアに係る資本的支出と修繕費)にある通り、 - 「ソフトウエアの機能の追加、向上」⇒(ならば) 資本的支出(≒資産計上)。 - バグ修正等、現状の維持該当 ⇒ 修繕費(≒経費処理OK) らしい。 https://www…

HTML-lint tool (≠ metrics tool)

html-tidy がいいのかな? $ wget http://binaries.html-tidy.org/binaries/tidy-5.2.0/tidy-5.2.0-64bit.rpm $ su # rpm -ivh tidy-5.2.0-64bit.rpm $ tidy --help SourceMonitor は、win環境専用 “Another HTML-lint 5” は、web専用 HTML::Lint for perl は…

pythonでの基数変換の基本は format() ←→ int()、より複雑ならMath::BaseCalc のclone?

pythonの基数変換において、2, 8, 16進数なら… format() , int()が利用できるので… #!/usr/local/bin/python # -*- coding: utf-8 -*- def main(): from_int() to_int() def from_int(): org_int = 10 for base in ["b","o","x","X"]: from_int = format(org…

Excel::Writer::XLSX::Utility for perlで excelのA1形式座標←→R1C1形式座標の変換

Math::BaseCalc かと思ったら、Excel::Writer::XLSX::Utility を使うようです。 http://search.cpan.org/perldoc?Excel%3A%3AWriter%3A%3AXLSX #!/usr/local/bin/perl use strict; use warnings; use utf8; # use Math::BaseCalc; use Excel::Writer::XLSX::…

Email::Stuffer for perlによるメール送信でReturn-Pathをセット

http://end0tknr.hateblo.jp/entry/20150819/1439950536 http://end0tknr.hateblo.jp/entry/20170205/1486293131 Email::Stuffer シリーズ?の第3弾? メールソフト(MUA)に表示されるアドレスとは、別のアドレスにエラーメールを返送したい為、メモ。 まぁ、グ…

Email::Stuffer for perl による HTMLメール送信 (HTML+TXTマルチパート)

Email::Stuffer や Email::Sender::Transport::SMTP 、 Email::Sender::Transport::SMTP::TLS に殆どおまかせなので、 以下のように書くだけでOK。 #!/usr/local/bin/perl use strict; use warnings; use utf8; use Email::Stuffer; use Email::Sender::Tran…

perlのCLIでコマンドライン引数を受取りは、Getopt::Long::GetOptions()

↓こんな感じで使用します。とうより、自分用メモ。 #!/usr/local/bin/perl use strict; use warnings; # http://tagomoris.hatenablog.com/entry/20120918/1347991165 use Getopt::Long qw(:config posix_default no_ignore_case gnu_compat); use Data::Dum…

sleep() , select() , Time::HiRes::sleep() による perlのsleep処理

perlのsleepでは、1秒単位のsleepは組込み関数のsleep()、 1秒未満単位のsleepは Time::HiResの sleep() を使用しますが、 select(undef, undef, undef, $sleep_time)でも、Time::HiRes::sleep() と同様の動作をできるらしい。 #!/usr/local/bin/perl use st…

64bit整数等の巨大な数の乱数発生は、Math::BigInt::Random for perl

http://search.cpan.org/perldoc?Math%3A%3ABigInt%3A%3ARandom ↓こうかな? #!/usr/local/bin/perl use strict; use Math::BigInt; use Math::BigInt::Random; use Data::Dumper; main(); sub main { my $max = 18_446_744_073_709_551_615; my $i = 0; whil…

MIME::QuotedPrint for perl による Quoted-Printable エンコーディング

http://search.cpan.org/perldoc?Email%3A%3AStuffer http://search.cpan.org/perldoc?Email%3A%3AMIME Email::Stuffer & Email::MIME を読んでたら、Email::MIME では、encoding に base64 or quoted-printable or 8bit を指定できるらしい。 quoted-printa…

client (javascript)側で、ログ出力し、それをサーバへ送信

qiita.com 上記を参考に、以下のように書いてみた。 <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"> </head> <body> <button type="button" onClick="log.error('LOG1','LOG2' );">TEST ERROR<…</button></body></html>

eclipseのプラグイン一覧をequinoxコンソールで確認

普通?にeclipseを起動し、メニューバー -> Help -> Installation Details で表示されるダイアログでも確認できますが、 windowsのコマンドプロンプトを起動し、equinoxコンソールでも次のように確認できます。 C:\>cd \eclipse C:\eclipse> eclipsec.exe -co…

perlからc/c++ の関数利用は FFI::Platypus >> perlxs

FFI::Platypus - search.cpan.org どうやら最近は、FFI::Platypus なるmoduleが存在し、 xs よりも簡単に c/c++ の関数を利用できるみたい。 SYNOPSIS のサンプルコードやdocumentを参照する限り、簡単そ

ssh port fowarding (ssh tunnel)で、remoteのmysql(RDS)に接続

忘れていたので、メモ $ ssh -L 5000:xxxx-db.hogehoge.ap-northeast-1.rds.amazonaws.com:3306 \ -i ~/.ssh/id_rsa \ end0tknr@12.34.56.78 とやっておいて、別窓で、↓こう $ /usr/local/mysql/bin/mysql --port=5000 -u foouser -p hogedb

rsync failed: command exited with code 12: error in rsync protocol data stream

rsync failed: command exited with code 12: error in rsync protocol data stream と、エラーになったので、調べてたら、local と remote のファイルのオーナーが異なっていたので、chown した。 おはずかしい

Date::Calc for perl で、GMT <-> Localtime 変換

こんな感じかな? #!/usr/local/bin/perl use strict; use warnings; use utf8; use Date::Calc; use Data::Dumper; main(@ARGV); # http://search.cpan.org/perldoc?Date%3A%3ACalc sub main { gmt_to_local(); local_to_gmt(); } sub gmt_to_local { my $is…

perlの日付&時間計算module (Date::Calc , DateTime)の比較

perlの日付&時間計算module (Date::Calc , DateTime)の比較 http://search.cpan.org/dist/Date-Calc/ http://search.cpan.org/dist/DateTime/ 主に Date::Calc を使っていますが、本日時点(2016/11/14)で、自分が気になるポイントを比較しています。 2016/11…

Re: Linuxで共有ライブラリの作成とダイナミックリンクをする方法

読み返すかも知れないので、メモ。 www.koikikukan.com ※ gcc , .so , -fPIC 等

s3cmd 経由による javascript (ajax)で利用できる簡易なs3 web api

が欲しくなったので、メモ。 s3cmd で、テキストやbase64な画像ファイルをput/get な感じです s3 ...というより IAM( Identity and Access Management ) の設定 以下の3つのポリシーを作成し、利用するユーザ等にアタッチさせます。 1番目の全バケット(*)に…

最尤推定 (さいゆうすいてい) - もっともらしい母比率を求める

サイコロの偶数が6回中、2回出るときの母比率(1回当たりの偶数が出る確立)? 例として、母比率=0.5の場合、6回中、2回、偶数が出る確立を求めます。 同様に母比率=0.2, 0.3 , 0.4 , 0.8 の場合を求めます。 以上より、「0.324135」が最も大きいことから、サイ…

指数関数,対数関数, 合成関数の導関数(微分計算)

指数関数 ※eは自然対数の底(ネイピア数) ※ a>0 , a≠1 対数関数 ※ a>0 合成関数である y = log(1-x) の微分 合成関数の微分では、 となることより、 1-x = t とおくと、y = log(1-x) = log t となる。 よって、この微分は

順列( permutation )と組み合わせ( combination )

順列( permutation ) 組み合わせ( combination )

二項分布と、多項分布

多項分布...すっかり忘れてた 二値変数 「合格or不合格」「表or裏」のように2つの値を取り得る変数 二項分布 二値変数において、成功率=P、試行回数=n、成功回数=kとなる確率は以下の通り 多値変数 「二値変数」と異なり、3つ以上の値を取り得る変数 多項分…

さくらレンタルサーバでのsmtpメール送信は、Net::SMTPS for perlのauth()で、LOGIN を指定

end0tknr.hateblo.jp 以前、書いたgmail.comのstmp送信をそのまま利用できなかったので、いろいろ試してみたら、以下のように auth() で AUTHMETHOD='LOGIN' を指定したら動きました。 http://search.cpan.org/perldoc?Net%3A%3ASMTPS #!/usr/local/bin/perl…

DockerToolbox-1.12.0.exe を win7 に installしたら、Docker Quickstart Terminal の実行でerror

https://www.docker.com/products/docker-toolbox https://github.com/docker/toolbox/releases/download/v1.12.0/DockerToolbox-1.12.0.exe をinstall後、Docker Quickstart Terminal でerror... Error creating machine: Error in driver during machine c…

RFC1855 - Netiquette Guidelines

http://www.ietf.org/rfc/rfc1855.txt 最近「ネチケット」って耳にしませんが、rfc化されてて驚いた

download streaming file by rtmpdump and , convert to mp4 by ffmpeg

#!/usr/local/bin/perl use strict; use warnings; use utf8; use Encode; use FindBin; use LWP::UserAgent; use XML::Simple; use Data::Dumper; ## NHKゴガク https://www2.nhk.or.jp/gogaku/english/ my $MUSIC_OUT_DIR = $FindBin::Bin; my $MUSIC_LIST…

open amを「 〜.jp」のようなccTLDの場合は3つ以上の「.」が必要

https://github.com/k-tamura/openam-book-jp/blob/master/preparing-for-installation.md に、 テスト目的のためであっても、localhostドメインを使用しないで下さい。 OpenAMの動作は、ドメイン名に基づいて返されるブラウザのクッキーに依存しています。…

pythonで、任意のdirにライブラリのpathを通す

#!/usr/local/bin/perl use strict; use warnings; use utf8; use FindBin; use File::Spec; use lib File::Spec->catdir($FindBin::Bin, '../lib'); : perlでは上記のように「use lib , FindBin」を使用していましたが pythonでは、以下のように「import sy…

forge rock社が提供する openam の dockerファイル

こちらで提供されてるみたい https://hub.docker.com/r/forgerock/openam/

App::cpanminus と OrePAN で、localにcpan mirrorを作成し、そこからinstall

internetに接続されていない環境に 対象のperl moduleをinstallする必要があったので、OrePANを使ってみみた。 前準備 事前に本番機には、App::cpanminus (cpanmコマンド)、 開発機?には、OrePAN + App::cpanminus (cpanmコマンド)をinstallしておいて下さい…

mysql5.7 をsrcからinstall

end0tknr.hateblo.jp 以前、↑こちらで mysql5.5をinstallしましたが、5.7では少々異なりましたので install mysql 5.7 $ wget http://dev.mysql.com/get/Downloads/MySQL-5.7/mysql-5.7.14.tar.gz $ tar -xvf mysql-5.7.14.tar.gz $ cd mysql-5.7.14 $ cmake…

install apache2.2 + perl5.18 + mod_perl2.0.9

install perl 5.18 $ wget http://www.cpan.org/src/5.0/perl-5.18.4.tar.gz $ tar -xvf perl-5.18.4.tar.gz $ cd perl-5.18.4 $ ./Configure -Dusethreads -Accflags="-fPIC" -de $ make $ make test $ su # make install ※「-Dusethreads -Accflags="-fPIC…

nginx + nginx-auth-ldap module

step1/3 - install $ cd /home/endo/tmp $ wget http://nginx.org/download/nginx-1.9.3.tar.gz $ tar -xvf nginx-1.9.3.tar.gz $ wget https://www.openssl.org/source/openssl-1.0.2d.tar.gz $ tar -xvf openssl-1.0.2d.tar.gz $ git clone https://github…

VirtualBoxのストレージをvdmk(可変サイズ)→vdi形式(固定サイズ)に変更

vdi形式(固定サイズ)の方が、ディスクI/Oが良い気がするので、次のような手順でやってみた。 STEP1 ファイル → 仮想メディアマネージャ STEP2 イメージファイルのコピー ※VDI(固定サイズ)、VDMK(可変サイズ) STEP3 旧ストレージをun-mount、新ストレージをmo…

word2013にプログラムコードを貼るなら、セクション区切り + 行番号表示 + ページ罫線 + 行間隔調整

で、ソースがそれらしく見えます。 step1 ページレイアウト → セクション区切り + 行番号表示 step2 デザイン → ページ罫線 step3 ホーム → 行間隔調整 フォントの調整はお好みで

ms-word2013で、ページ全体を罫線で囲むには、デザインタブ→ページ罫線

ですって

mysqlのLOAD DATA LOCAL INFILEによる bulk insert オレオレまとめ

sqlの"--"コメントにも記載していますが、自分としてのポイントは、 LOCAL INFILEの"LOCAL"で、"Access denied for user..."のようなエラーになりづらい "\N"としなくても、NULLIF()でnull値をimportできます かな? LOAD DATA LOCAL INFILE '/path/to/import…

(再)Amon2 for perl のControllerに対するTest::Moreによるunit test

end0tknr.hateblo.jp ↑こんな風にplug-inを書いて頑張らなくても Plack::Util::load_psgi や Test::WWW::Mechanize::PSGI で十分実現できるそうです。↓ use strict; use warnings; use utf8; use HTTP::Cookies; use JSON; use Plack::Test; use Plack::Util…

Amon2 for perl のControllerに対するTest::Moreによるunit test

以下の get_dummy_context() 内に記載しているようにAmon2クラスに対して、plug-inを書くとOK use strict; use utf8; use t::Util; use CGI; use Date::Calc; use JSON; use Plack::Session; use Plack::Test; use Plack::Util; use Test::More; use Data::D…

JSON for perl ? における 文字列(string) or 数値(numeric, integer)の判別方法

サーバからjsonを受け取った javascript が、 数値(例:2)を期待し厳密等価演算子 (===)でvalidateしたところ、 文字列(例:"2")だった為、false となったことがきっかけです。 perl製サーバアプリとしては、$val += 0 により、数値化( numfy )しましたが、 数…

install redmine + nginx + unicorn

前準備 - 必要moduleのinstall # yum groupinstall "Development Tools" # yum install openssl-devel readline-devel zlib-devel curl-devel \ libyaml-devel ImageMagick ImageMagick-devel # yum install ipa-pgothic-fonts # yum install ruby ruby-deve…

Net::SMTPS for perl による Gmail SMTP利用には、アプリパスワードが必要

end0tknr.hateblo.jp 以前↑このように書いて動作していた気がしますが、 googleに2段階認証が導入された為でしょううか? 動作しなくなっていたので、以下のように修正しました。 #!/usr/local/bin/perl use strict; use utf8; use FindBin; use File::Spec; …

無料ssl証明書のLet's Encryptのnginx on amazon linux へのお試し導入

ググルと、「Let's Encryptは、amazon linuxでは試験段階」と言う情報が チラホラ見られましたが、私の試した範囲では、迷うようなことはありませんでした。 STEP0 参考url 何より日本語urlがあったお陰ですね。 https://letsencrypt.jp/docs/using.html#ins…

perlで mysqlのauto_incrementの値を確認するには、mysql_insertid

sub add_auto_increment_record { my ($self,$dbh) = @_; my $sql =<<EOF; insert into test_table (key, val) values (?, ?) EOF my $sth = $dbh->prepare($sql); my @vals = ('FOO','BAA'); unless($sth->execute(@vals)){ $self->error( $sth->errstr ); return undef; } return $sth->{mysql_insertid}; }</eof;>

ITILにおけるインシデント管理と、問題管理

そもそも、両者は目的が異なります 項目 内容 インシデント管理 迅速に、通常のサービス運用(SLA範囲)を回復 問題管理 インシデントの根本原因の検知と解決、予防 インシデント・ライフサイクルと、1次,2次...サポート 以下の通り (ITIL本からの抜粋です)

jQuery UI Datepickerに対し、日本語化、複数月表示、祝日,土日色付け

普段、bootstrapを使用する機会が多い為、 カレンダー入力はそのplug-inである bootstrap-datepicker.js を使用していましたが... end0tknr.hateblo.jp bootstrapはバージョンアップが早い為でしょうか、 手元にあるbootstrapを最新版に更新した所、bootstra…