open FILE, "recorder.ini"||die "file open failed\n"; chomp(@lines=); foreach(@lines) { ($key,$value)=split(/=/,$_); $hash{$key}=$value; }