[天気:晴](広島県福山市) <睡眠:130--755><労働900--1740>
んゐぁー、眠いのう。
午後から週報に続いて部内の打ち合わせが続く。んぁ。
帰宅後は最寄スーパーで食糧を調達して、再び帰宅して夕食。
amazon
マーケットプレース
よりクロネコメール便にて
注文が17日でもう届くとは出品者GJ! ということで5評価をつけておきました。
だれでもわかる系の本と専門書の中間的なレヴェルで、読み易くてそこそこ深いかと。
5
[Web][Diary] HNS/HNF RAWコマンド
前節のアマゾン・アソシエイト用HTMLを日記中に表示するため、
HNF内の記述がそのままHTMLとして出力されるコマンドが欲しい、
というわけで
散財日記
(2001/03/31)を参考に、
#
# raw.ph
#
# add RAW command to hnf
#
# example
# RAW <a href="#somewhere">e=mc<sup>2</sup> &</a>
#
#
package HNS::Hnf::Command::New;
$AllowCommands = [ $HNS::Hnf::Command::New::AllowCommands, 'RAW' ];
package HNS::Hnf::Command::Sub;
$AllowCommands = [ $HNS::Hnf::Command::Sub::AllowCommands, 'RAW' ];
package HNS::Hnf::Command::LI;
$AllowCommands = [ $HNS::Hnf::Command::LI::AllowCommands, 'RAW' ];
package HNS::Hnf::Command::RAW;
use vars qw(@ISA $Template $EndTemplate $NumAttr $IsOneline $AllowCommands
$IsBeginSection $CountName $OmittableEnd);
@ISA = qw(HNS::Hnf::Command::Inline);
$AllowCommands = [ '' ];
$Template = qq(\n%term\n);
sub AsHTML($$$){
my ($self, $start, $params) = @_;
my $term = $self->{arg_content};
$term =~ s/&/&/g;
$term =~ s/</</g;
$term =~ s/>/>/g;
$params->{term} = $term;
$self->SUPER::AsHTML($start, $params);
}
# included script should finally return true.
1;
のような raw.ph を index.cgi のあるディレクトリに置いて、
theme.ph より require 。
これで RAW コマンドが使える。あむ。
朝食: クリームチーズ付トースト、アイスコーヒー
昼食: 鰹のぶつ切り煮、胡瓜とトマトのマヨネーズ和え、他@社食
夕食: カツ丼、ポテトサラダ、マルちゃん麺づくり鶏ガラ醤油ラーメン
以上、1 日分です。