したらばTOP ■掲示板に戻る■ 全部 1-100 最新50 | |

プログラムスレッド

129：女傑：2013/03/02(土) 16:34:36
sub readhashfile
{
local %table;
local $fname;
local($name, $val);

$fname = $_[0];

open FILE, "< $fname";
@lines = <FILE>;
$kazu = @lines;
for ($i=0;$i<$kazu;$i++) {
chomp $_;
($name, $val) = split(',', $lines[$i], 2);
if ($name ne "") {
$table{$name} = $val;
}
}

close FILE;
return %table;
}
新着レスの表示

名前： E-mail（省略可）：

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）
掲示板管理者へ連絡 無料レンタル掲示板