Perl 好きなグループです。自由にご参加ください。
はてなブログを持っていれば、誰でも参加できます。
1234 -> 001234 みたいな数字のゼロ埋め作業をPerlで楽にやる方法。 下記のように書くと便利です。 my $hoge = 1234; my $fuga = sprintf("%06d", $hoge); print $fuga; # -> 001234 sprintf関数は指定した書式で文字列を作成することが出来ます。 応用して小数点の丸め込み(四捨五入)にも使えます。 my $ho…
はい、前回言ってたモジュール公開しました。 metacpan.orgCPAN Authorの登録や、minilコマンド使ってのモジュール公開など、 初めてでしたが比較的やりやすかったです^^ただ何箇所か詰まった部分もあるので、そこはPerl入学式の方に聞いて助けてもらいました。ご協力ありがとうございました! なお、「Hash::Uniqueという名前は空間名を占有しすぎ」というご指摘もいただいたの…
これまでPerlを利用した手元開発環境でどのようにcronを動かすか迷ってきたのだけど、その解決策が見つかったのでメモ。 課題 開発サーバや本番サーバではcronで定期的にスクリプトが実行されている 定期的に実行されているスクリプトが動かないと、正しく動かない機能がある 例えば予約投稿みたいな機能など しかし手元開発環境ではcronのように定期的にスクリプトを実行していなかった 結果として、手元開…
Waza Labにブログを移行しました。
新着エントリーが10件表示だったので、500件表示にしてみた。ブログ探しに使ってみてください。 はてなブログ 新着500件 テック系ブログを探すのに丁度良い 僕はテックエントリーが大好きで、自分の知らない領域の技術について読んだり、ライフハック的な技術の使い方を淡々と記録している日記を読んだりします。これが楽しい。 ただ、ぼーっと新着エントリーを眺めるより、テック系ブログを見つける。と目的を持ちな…
環境 vagrantのCentOS6.x インストール git clone https://github.com/rakudo/rakudo.git cd rakudo/ perl Configure.pl --prefix=$HOME/perl6 --gen-moar --gen-nqp --backends=moar make make install バージョン確認 $ $HOME/perl…
1日目(+懇親会)、2日目と参加してきた。 参加したトークは以下。 1日目 Opening メリークリスマス! 【sponsored contents】若手エンジニア達の生存戦略 Perl6 on JVM: It works?? Lightning Talks Day 1 2日目 ISUCONの勝ち方 Perl 5.22 and You Adventures in Refactoring Para…
デフォルトで SQLite が利用できるし、たぶん得する人はいないと思うけれど、いろいろな理由で PostgreSQL しか選択肢がなかったので、PostgreSQL でも動くようにちょっと手を加えてみました。 といっても、CREATE TABLE しているところを PostgreSQL に対応するよう、適当に書き換えただけだけど。 差分は、こんな感じ。https://github.com/hat…
Perlではその名もBenchmarkというモジュールを使うと 簡単にベンチマーク=性能比較を行えます。まずはやってみました。 #!/usr/bin/perl -w use strict; use Benchmark qw/timethese cmpthese/; my $result = timethese( 10000, { loop1 => sub{ my $i = 0; while ( $…
これ何 Perl で MeCab や CaboCha を使う際の適当にメモ MeCab に関しては情報が多いが CaboCha はあまり無いので Mac + Perl でしたい方は気持ち参考にして頂けたらと思う特に自然言語処理の研究がメインではないが、文書構造など適度に取得して使いたい分野 全く触れた事無い人でも便利ライブラリを使う事で以下のように色々遊べる 書く人が書けば以下のような適当なのでも…
次のページ