第3回2ch全板人気トーナメント＠UNIX板 (778ﾚｽ)
上下前次1-新

---

613(2): 戦時板国民 2008/07/25(金)19:06 AAS
#!/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];
省16

---

上下前次1-新書関写板覧索設栞歴

---

あと 165 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.006s