くだすれPerl(超初心 ..
632:nobodyさん
07/12/29 15:00:37 CoF2fqIA
sub tt {
my ($t,$n) = @_;
print $t->{"水"};
print "\n";
print $n;
}
%c;
$c{"月"} = 1;
$c{"火"} = 2;
$c{"水"} = 3;
&tt(\%c,1);
次ページ続きを表示1を表示最新レス表示スレッドの検索類似スレ一覧話題のニュースおまかせリスト▼オプションを表示暇つぶし2ch
4400日前に更新/307 KB
担当:undef