第3回2ch全板人気トーナメント＠UNIX板 (778ﾚｽ)
第3回2ch全板人気トーナメント＠UNIX板 http://mevius.5ch.net/test/read.cgi/unix/1206926465/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
613: 戦時板国民 [sage] 2008/07/25(金) 19:06:58 #!/usr/bin/perl use strict; my @dayomon = reverse qw/だよ もん/; my @mode = qw/dayomon decimal/; my $term = 'だよもん！'; die "Usage: perl dayomon.pl dayomon|decimal\n" if $ARGV[0] !~ /^\d+$|^($dayomon[0]|$dayomon[1])+${term}$/; my $result = $ARGV[0]; my $flag = $result !~ /^\d+$/; if ($flag) { $result =~ s/$term//; $result =~ s/$dayomon[$_]/$_/g for (0..1); $result = oct("0b$result"); } else { $result = sprintf("%b", $result); $result =~ s/$_/$dayomon[$_]/g for (0..1); $result .= $term; } printf("%s: %s\n", $mode[$flag], $result); __END__ ダヨモン様、御久シ振リトナリマシタンダヨモン。 ダヨモンダヨダヨダヨモン！日ノ組決勝デハ一緒ニ遊ンデ下サリ、感謝シテヰマスダヨモン。 燃エ尽キテ仕舞ヒ、守護神殿ノ御礼モ持チ帰リモ今頃ニナツタノガ心苦シインダヨモン。 反省シテ更ナル現実逃避ニ走ツタダヨモンガ、コンナ伊国麺デハ困ルンダヨモン…。 http://mevius.5ch.net/test/read.cgi/unix/1206926465/613
614: 戦時板国民 [sage] 2008/07/25(金) 19:08:06 >>613 .= <<EOT; 終戦画像ダヨモン http://senji.xrea.jp/img/senji815.jpg 御礼画像ダヨモン http://senji.xrea.jp/img/senji018.jpg 御酒画像ダヨモン http://senji.xrea.jp/img/senji019.jpg 頂キ物ダヨモン： http://senji.xrea.jp/contrib/gyokusai.jpg （画像提供：電脳遊戯機械・業界板様） http://www.geocities.jp/hanpen_flash/toname/gyokuon/ （動画提供：閃光動画板様） 【戰時板】第三回全板人気選手権・第六師団衛生隊【交流・雑談】 http://bubble6.2ch.net/test/read.cgi/senji/1216910083/ EOT # 怒ラレサウナノデ逃ゲルンダヨモン。 http://mevius.5ch.net/test/read.cgi/unix/1206926465/614
619: 名無しさん＠お腹いっぱい。 [sage] 2008/07/26(土) 02:05:03 書き込み途中でおかしなことになったようだよもんorz >612 乙だよもん ここは投票御礼が遅れても問題なしだよもん DDRとか流行ってた頃はゲーセンに行く機会もあったんだよもん 懐かしいんだよもん 今日は最後の投票に行く予定なので、投票所でお会いしたらよろしくだよもん >613-614 乙デアリマスンダヨモン 沢山ノオ土産アリガタウゴザイマスンダヨモン シカモ、>613ハ小生ガ>80デ所望シテイタ「ダヨモン計算機」ダヨモン！ 感謝致シマスンダヨモン！ サウ言ヘバ、以前は「ダヨモン変換機」ナルモノガ存在シマシタンダヨモン 文末ニ「ダヨモン」ヲ付与スル、此レモナカナカノ逸品デアリマシタンダヨモン http://mevius.5ch.net/test/read.cgi/unix/1206926465/619
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.017s*