for ($i=0; $i < $size; $i++){ #11 ($key, $value) = (split /=/, $fields[$i]); #12 $value =~ s/[;<>\(\)\{\}\*\|'`\&\$!#:"\\]/\ $1/g; #13 $value =~ s/+/\ $1/g; #14 $hash{$key} = $value; #15 }