unless’s blog

日々のちょっとした技術的なことの羅列

Perl

awkの変わりにPerlワンライナーを使う

たまにCapistranoとか使っててawk使いたい時とかにエスケープが難しすぎてイライラすることがある そんなときにPerlワンライナーでawkの変わりをさせたりするのでメモがてら載せておく capistranorb.com awk その時によって違うのでなんとも言えないがこんな…

Perlのmapでハマった話

少し考えればすぐわかることだがハマってる時はぜんぜん気がつかずに困ってたのでメモ #!/usr/bin/perl use strict; use warnings; use Data::Dumper; sub get_array_ref { my $func = sub { return undef; }; my @array = undef; my $array_ref = [map { $f…

GCと循環参照について

いままでぜんぜん気にしていなかったけどPerlのGCはリファレンスカウント方式らしい なのでオブジェクトへの参照が作られるたびにリファレンスカウントを増やしていって オブジェクトへの参照が破棄されたタイミングでリファレンスカウントが減ることになる …

[Perl] [GeoIP2] MaxMind::DB::Reader::XS と MaxMind::DB::Reader での速度比較

GeoIP2 とは 下記にあるようにipアドレスに紐づく地域やISP等が格納されているMaxMind社が提供するDatabase www.maxmind.com 概要 perlの公式APIのREADMEに下記のような記載があり本当に100倍も速度が違うのか気になったので速度を比較してみる github.com T…