Bug 594605

Summary: file cannot recognize perl modules and perl documentation
Product: Red Hat Enterprise Linux 6 Reporter: Milos Malik <mmalik>
Component: fileAssignee: Jan Kaluža <jkaluza>
Status: CLOSED CURRENTRELEASE QA Contact: Milos Malik <mmalik>
Severity: medium Docs Contact:
Priority: medium    
Version: 6.0CC: ovasik
Target Milestone: rcKeywords: Regression
Target Release: ---   
Hardware: All   
OS: Linux   
Whiteboard:
Fixed In Version: file-5.04-5.el6 Doc Type: Bug Fix
Doc Text:
Story Points: ---
Clone Of: Environment:
Last Closed: 2010-11-10 20:23:14 UTC Type: ---
Regression: --- Mount Type: ---
Documentation: --- CRM:
Verified Versions: Category: ---
oVirt Team: --- RHEL 7.3 requirements from Atomic Host:
Cloudforms Team: ---
Attachments:
Description Flags
Fix for regressions none

Description Milos Malik 2010-05-21 07:09:24 UTC
Description of problem:
Some .pm and .pod files are not correctly recognized by file. I believe it's a regression because file-5.03-12.el6 recognizes them correctly.

Version-Release number of selected component (if applicable):
file-5.04-4.el6.i686
perl-5.10.1-109.el6.i686
perl-DBI-1.609-4.el6.i686
perl-HTML-Parser-3.64-2.el6.i686
perl-libwww-perl-5.833-2.el6.noarch
perl-Pod-Simple-3.13-109.el6.i686
perl-Test-Harness-3.17-109.el6.i686
perl-MailTools-2.04-4.el6.noarch
spamassassin-3.3.1-2.el6.i686

How reproducible:
always

Steps to Reproduce:
* pick any of these files and run file on it
/usr/lib/perl5/DBI/FAQ.pm
/usr/lib/perl5/HTML/Filter.pm
/usr/lib/perl5/HTML/HeadParser.pm
/usr/lib/perl5/HTML/LinkExtor.pm
/usr/lib/perl5/HTML/Parser.pm
/usr/lib/perl5/HTML/PullParser.pm
/usr/lib/perl5/HTML/TokeParser.pm
/usr/share/perl5/HTML/Form.pm
/usr/share/perl5/HTTP/Headers/Util.pm
/usr/share/perl5/Locale/Script.pod
/usr/share/perl5/LWP/Protocol/file.pm
/usr/share/perl5/LWP/Protocol/gopher.pm
/usr/share/perl5/Mail/Header.pod
/usr/share/perl5/Mail/Internet.pod
/usr/share/perl5/Mail/SpamAssassin/Plugin/MIMEHeader.pm
/usr/share/perl5/Pod/Find.pm
/usr/share/perl5/Pod/Html.pm
/usr/share/perl5/pod/perl5004delta.pod
/usr/share/perl5/pod/perl572delta.pod
/usr/share/perl5/pod/perlpod.pod
/usr/share/perl5/Pod/Select.pm
/usr/share/perl5/Pod/Simple/HTMLBatch.pm
/usr/share/perl5/Pod/Simple/HTML.pm
/usr/share/perl5/Pod/Simple/Subclassing.pod
/usr/share/perl5/Pod/Simple/XHTML.pm
/usr/share/perl5/TAP/Formatter/Console/ParallelSession.pm
/usr/share/perl5/TAP/Formatter/Session.pm

Actual results:
you will see messages like "HTML document text"

Expected results:
you will see messages like "Perl5 module source text" or "Perl POD document text"

Comment 3 Jan Kaluža 2010-06-11 10:55:40 UTC
Created attachment 423237 [details]
Fix for regressions

Attached patch fixes regressions in file-5.0.4 which are causing described
problem. It basically removes excessive HTML/SGML "magic patterns".

Comment 6 Jan Kaluža 2010-06-11 11:44:26 UTC
Commited to CVS, fixed in version file-5.04-5.el6.

http://post-office.corp.redhat.com/archives/cvs-commits-list/2010-June/msg01612.html

Comment 8 releng-rhel@redhat.com 2010-11-10 20:23:14 UTC
Red Hat Enterprise Linux 6.0 is now available and should resolve
the problem described in this bug report. This report is therefore being closed
with a resolution of CURRENTRELEASE. You may reopen this bug report if the
solution does not work for you.