視聴予定のものだけ
※太字斜体は録画予約がまだのもの
- 24:30 BS11 一週間フレンズ。
- 25:00 サンテレビ 彼女がフラグをおられたら
# 仕様: | |
# ホーム画面の領域を「field」とする。 | |
# fieldは[縦][横]の2次元配列。 | |
# fieldの各マスについて、配置できるウィジェットの高さ毎の最大横幅を持を格納した2次元配列を「fmap」とし、 | |
# 縦幅と最大横幅ごとに配置可能なマスの数を集計したものを「wctable」とする。 | |
# | |
# ホーム画面に配置するウィジェットの属性を「widget」とし、その配列を「widgets」とする。 | |
# | |
# 判定について | |
# fieldのマスに対し、widgetをいくつ配置できるか判定する |
#!/usr/bin/perl | |
while(defined($_ = <STDIN>)) { | |
chomp $_; | |
my $template = $ARGV[0]; | |
my @o=unpack("$template", $_); | |
print join(",",@o) . "\n"; | |
} |
#! /usr/bin/perl | |
my $length = $ARGV[0]; | |
binmode(STDIN); | |
while (sysread(STDIN, my $buf, $length)) { | |
print $buf . "\n"; | |
} |
set /a n1=1,n2=1 & for /L %a in (3,1,10) do @((set /a n3=n1+n2,n1=n2,n2=n3)>nul & echo %a:!n3!) |
for /l %i in (1,1,100) do @((set/a a=%i%3,b=%i%5)>nul & if !a!!b!==00 (echo FizzBuzz) else (if !b!==0 (echo Buzz) else if !a!==0 (echo Fizz) else (echo %i))) |
I am the bone of my sh. | |
――― 体はshで出来ている | |
Steel is my sed, and fire is my awk. | |
血潮はsedで、心はawk | |
I have created over a thousand forks. | |
幾たびのforkを越えて不敗 | |
Unknown to Error. |
○○(あなたの好きなOSSの言語・もしくはLinuxディストロ)のおっかけをやって10余年が経過した。 | |
当時大学3年生だったオレは△△(あなたの好きな何プロダクト)をやってた○○に出会い、 | |
即効でファンになった。元々DevコンやOSSとは縁のない生活だったが、 | |
それからは○○の為だけに生きてきたようなモンだ。 | |
毎日○○のソースを読み、毎週勉強会へも行き、もちろんフォーラムにも参加しまくって | |
月3回必ず応援のコメントとpull requestを送った。イベントも全部行った。 | |
カンファレンスで一緒に全国制覇したのも二度や三度じゃない。 | |
ユーザー会やって二年目、セミナーで俺のハンドルを覚えてくれてた時には | |
嬉しくて本気で涙が出た。人生で最高の喜びだと有頂天になって、帰り道一人で吼えてた。 | |
地元の役場の事務に就職した後も、それだけが楽しみで生きてきた。 |
体はshで出来ている | |
I am the bone of my sh. | |
血潮はsedで心はawk | |
Steel is my sed,and fire is my awk. | |
幾度のforkを越えて不敗 | |
I have created over a thousand forks. | |
ただ一度のエラーもなく、 |
Sub QuickSort(arr, idx) | |
dim lstack(512) | |
dim rstack(512) | |
dim sp | |
sp = 1 | |
dim ltmp, rtmp | |
dim l, r, x, swap | |
'0番目をpush | |
lstack(0) = 0 |