Lines Matching refs:file_name
715 my $file_name = shift;
718 if (-f $file_name.$maybedot) {
719 my $file_type = `file $file_name`;
723 ($nm_output = `nm $file_name 2>&1`) && $nm_output &&
725 return '1' if ($file_name =~ /\.bin$/o);
726 return '1' if ($file_name =~ /\.so\.*/o);
727 return '1' if ($file_name =~ /\.dylib\.*/o);
728 return '1' if ($file_name =~ /\.com\.*/o);
729 return '1' if ($file_name =~ /\.dll\.*/o);
730 return '1' if ($file_name =~ /\.exe\.*/o);
731 return '1' if (basename($file_name) !~ /\./o);
748 my $file_name = shift;
750 if (-f $file_name && (( `file $file_name` ) =~ /Zip archive/o)) {
751 return '1' if ($file_name =~ /\.jar\.*/o);