タグ

Perlとtipsに関するmarkupのブックマーク (4)

  • Yet Another Hackadelic - CPANモジュールのパスを表示する

    #!/usr/bin/perl use strict; use warnings; my $pm = $ARGV[0]; exit unless $pm; $pm = join("/", split(/::/, $pm)) . ".pm"; exit unless (eval{ require $pm; }); print $INC{$pm} . "\n"; こんな感じ?pmpath.plとかで保存して、PATHの通ったディレクトリに実行権限つけて置いといて $ pmpath.pl Test::More /usr/lib/perl5/5.8.8/Test/More.pmみたいな感じ $ vi `pmpath.pl Test::More`とかやるとモジュール名でそのファイルが開けるです。便利。 追記 $ perldoc -l Test::Moreで同じ結果みたいです。 知らなかったー!

    Yet Another Hackadelic - CPANモジュールのパスを表示する
  • nkf の技 - にぽたん研修所 兼 にぽたん休憩所

    http://kerolin.jspeed.jp/Computer/Linux/vi070323.html的なことなんだろうけどDOSの改行コードをUnixのそれになおすには :set notextmodeとやればいいらしい。 知らんかった。 「vi の技」ってか、それ多分、vi じゃだめじゃないすかね。 set: no textmode option: 'set all' gives all option values.vim ならイケる。 でも、改行を変えたい場合は、nkf がラクでいい。 ぶっちゃけ、20 世紀に慣れ親しんだ CGI たちのせいで、21 世紀になる頃には古い文化だと思ってて、nkf 嫌ってた。 昔は、色々な CGI にこう書かれてたもん。 $NKF = '/usr/bin/nkf'; そのせいだ。 話逸れた。 use strict; print "Hello!\

    nkf の技 - にぽたん研修所 兼 にぽたん休憩所
  • D-5 出張版

    手が痛い。酷使してるからか。昨日今日と微妙に握力がないので今日は早めに8時くらいには帰宅。帰りにスーパーに寄ったら豚ロースが半額ですよ、奥さん。嬉しくてついついいっぱい買って、味噌漬けにしておいた。ニンニクと鷹の爪を一杯いれておいたぜ。むふふ。

    markup
    markup 2007/05/11
    Catalystベースのアプリケーションのlib構成
  • 404 Blog Not Found:perl tips - Encodeを速く使う方法

    2007年04月23日01:30 カテゴリLightweight LanguagesTips perl tips - Encodeを速く使う方法 はっきり言ってこれはフェアではない。 みかログ: ErlangとPerlの速度比較 Perl側は,Encodeが遅い. Encode::from_toがinplaceでコンバートしてしまうために,直前に文字列コピーがあるのも影響しているのかも なぜなら、Encode::from_to()は速度ではなく、安全性に最適化しているから。 そもそもはじめからUTF-8、それもutf8フラグがたっている文字列にfrom_toを使うのはばかげている。 for(my $i = 0; $i < 0xffff; $i++) { my $str2 = $str; Encode::from_to($str2, "UTF-8", "Shift_JIS"); } は単に

    404 Blog Not Found:perl tips - Encodeを速く使う方法
  • 1