読者です 読者をやめる 読者になる 読者になる

Perl

YAPC行ってきた。が><

前夜祭 まともにスケジュール見ずに、夕方に懇親会みたいなのがあるだけかなーと思い込んでおり、普通に仕事してた。 1日目 仕事の関係で、しょっぱな1つだけ見ることに。 会場に数分遅れで到着。 なんとか座ることができた。 前の方にCH1. CH2.って書いてる…

最近もPerlです。

最近はMojolicious::Liteでいじいじしています。 日本語への翻訳、本当に助かっています。ありがとうございます。 最近買った本 Perl徹底攻略 (WEB+DB PRESS plus)作者: 大沢和宏,cho45(さとう),小林篤,和田裕介,嶋田裕二(xaicron),牧大輔(lestrrat),奥一穂,…

インストールがー

MeCabをPerl(5.18.0)で使おうとインストール作業をしてましたが・・・エラー! (スクリプト言語のバインディング) うーん・・・ とりあえずText::MeCabを入れました。 今までPerl5.8.8でMongoDBやMeCabなどいろいろインストールしていました。 ただ、per…

実行時間計測(Perlメモ)

実行時間を計測する必要性が出てきたのでメモ。 Time::HiResモジュールを使います。 "I Love Perl Because I Love Perl" プログラム !/usr/bin/perl use strict; use warnings; use Time::HiRes qw(usleep ualarm gettimeofday tv_interval); &main(); exit(…

数字をきれいに10分割(Perl)

SVM_Lightで10分割交差検定を行いたい、そのために入力データを10個に分割し、10個のデータセットを作りたいと考えています。 (卒論時にそういうことを行うプログラムを作ったのですが、改めて作ってみようかと思っています) とりあえず、入力データがn個…

配列・ハッシュ・ソートメモ(Perl)

配列・ハッシュがごちゃごちゃになって意味が分からなくなる時があるので、メモしておきます。 "I Love Perl Because I Love Perl" ソートしたいデータ構造 my $data = (); $data -> [0] { name } = "三郎"; $data -> [0] { id } = 3; $data -> [1] { name }…

map(perl)

Perlに出会って3年目。研究等でいろいろPerlプログラムを作ってきましたが、mapを一度も使っていませんでした。 理由としては、一番最初に読んだ勉強本にmapの説明が載っておらず(記憶は曖昧です)、使わなくてもなんとかやってこれたからだと思います。 そ…

Adobe紹介生放送(ニコ生)を見ています

先日ニコ生で放送されたAdobe Create Now Liveをタイムシフトで今見ています(残り30分)。 おもしろい!! 私はAdobe Creative Suite 6 Design & Web Premiumを持っており、Photoshopを何度か使っています。 (写真を加工したり、パワーポイント素材を加工し…

過去の産物のありがたみ

今日は形態素解析を行うプログラム(Perl)を書いていました。 あるディレクトリの中にあるデータを解析し、結果を新しいファイルに出力するプログラムです。 前にも同じようなものを作っていた 1、2か月くらい前に、小さなデータに対して同じようなことを行う…

Perlメモ(autodieプラグマ)

Perl 5.10以降でautodieプラグマというものが使えるそうなので使ってみました。 use 5.016; use autodie; open FF, '<', 'test.txt'; close FF;test.txtがなかった場合、 Can't open 'test.txt' for reading: 'そのようなファイルやディレクトリはありません…

perlメモ(split)

my $line = "hello|world|hello|perl";こういうのを「|」でsplitするメモ。 # OK my @array = split(/\|/, $line); # NG my @array = split(/|/, $line); 今日やったこと 研究関係

Perl面白い

電車の移動時間にPerl再勉強しているのですが、 知らなかったことがちょくちょくでてきておもしろいです。 ずっと本を見ていたい。 今日やったこと 研究関連 Perl勉強

Perl初めて知ったことメモ

2年前、研究室配属後に入門PerlでPerlを勉強したのですが、 最近初めてのPerl 第6版で再勉強しています。 初めて知ったこと及び忘れていたことをメモしておきます。 整数リテラル 下線をはさめることができること。 my $sum = 1_000 + 25_000; print $sum; #…

utf8→eucメモ

utf8で書かれたテキストファイルを、プログラム中でeucに変換して処理をしたい。 とりあえずメモ。 use Encode Encodeを使う方法を見つけました。 eucにしたい原文がこれ。 Encodeを使ってみたらこうなりました。 「?」が表示されました。 他の方法で nkfコ…