Perl

[ Perl ]

stfuawsc

stfuawsc # と、2 件書いて、つくづく stfuawsc だなぁ。。。と orz ワシ、超がんがれ

使うものじゃなくて作るもの

使うものじゃなくて作るもの # via New Generation Chronicle:開拓者から改革者へ ネタで未来を切り開く男 大沢和宏 (2/6) - ITmedia エンタープライズ メリットは、自分 ...

Template::Plugin::TruncateByWord

Template::Plugin::TruncateByWord # UTF-8 な文章の概要(「あいうえおかきくけこ」を「あいうえお。。。」)とか表示するのに Template-Toolkit でやってしまいたいなぁ、と思った 本当は Template-Toolkit でフラグ付 UTF-8 を ...

Template::Plugin::TruncateByWord 再考

Template::Plugin::TruncateByWord 再考 # もうちょっと探して似たようなものがなければ、pod 書いて公開するか とか言った手前 、調べてみた 「文字数」ってのは見つからなかったので公 ...

二年前の日記を見てプチ鬱

二年前の日記を見てプチ鬱 # 喉元過ぎれば、の可能性ありなので書いておく 二年前 の日記で DateTime::Format::DateParse をあつかっている にもかかわらず、最近やった仕事でまんま二 ...

Template::Plugin::TruncateByWord (3)

Template::Plugin::TruncateByWord (3) # こんなもんでいいか package Template::Plugin::TruncateByWord; use strict; use warnings; our $VERSION = '0.1'; use Template::Plugin::Filter; use base 'Template::Plugin::Filter'; use Encode; our $FILTER_NAME_DEFAULT = 'truncate_by_word'; our $ORG_ENC_DEFAULT = 'utf8'; sub init { my $self = shift; $self->{_DYNAMIC} = 1; $self->install_filter($self->{_CONFIG}->{name}||$FILTER_NAME_DEFAULT); $self->{_CONFIG}->{enc} ||= $self->{_ARGS}->[0] || $ORG_ENC_DEFAULT; return $self; } sub filter { my($self, $string, $args, $conf) = @_; return '' unless $string; # ...

Template::Plugin::TruncateByWord 0.1 公開

Template::Plugin::TruncateByWord 0.1 公開 # Template::Plugin::TruncateByWord を公開 [% "あいうえお" | truncate_by_word(3, "。。。") %] # result あいう。。。 って感じ。こういうものの英語ドキュメント ...

Copyright © 髭。/ Hugo + hugo-book