Lines Matching refs:FileName
159 my($name,$ContentType,$FileName);
168 $FileName = $1 || 'unknown';
186 if($FileName || $ContentType) {
189 $FileName, #
195 ) = &CheckContentType(\$value,$FileName,$ContentType);
197 $FORM{$name} = $FileName;
198 $new_fname = $FileName;
199 push(@NEWFNAME_DATA,"$FileName\t$Ext\t$Length\t$ImageWidth\t$ImageHeight\t$ContentName");
252 my($DATA,$FileName,$ContentType) = @_;
274 …&& ($FileName =~ /$MacBinary_FileName/i || substr($$DATA,102,4) eq 'mBIN')) { # DATA TOP 128byte M…
285 $FileName =~ s/^.*\\//; # Windows, Mac
286 $FileName =~ s/^.*\///; # UNIX
287 $FileName =~ s/&/&/g;
288 $FileName =~ s/"/"/g;
289 $FileName =~ s/</</g;
290 $FileName =~ s/>/>/g;
298 if($FileName =~ /\.(\w+)$/) {
530 $FileName,