Lines Matching refs:value
178 $value = "";
181 $value .= $_;
184 $value =~s /\x0D\x0A$//;
185 if($value ne '') {
195 ) = &CheckContentType(\$value,$FileName,$ContentType);
206 print OUT $value;
211 $value =~ tr/+/ /;
212 $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
213 &Encode(\$value,'trans');
215 $FORM{$name} .= $value;
225 my($name, $value) = split(/=/);
228 $value =~ tr/+/ /;
229 $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
232 &Encode(\$value,'trans');
234 $FORM{$name} .= $value;
577 my($value,$Trans) = @_;