Note: This bug is displayed in read-only format because
the product is no longer active in Red Hat Bugzilla.
RHEL Engineering is moving the tracking of its product development work on RHEL 6 through RHEL 9 to Red Hat Jira (issues.redhat.com). If you're a Red Hat customer, please continue to file support cases via the Red Hat customer portal. If you're not, please head to the "RHEL project" in Red Hat Jira and file new tickets here. Individual Bugzilla bugs in the statuses "NEW", "ASSIGNED", and "POST" are being migrated throughout September 2023. Bugs of Red Hat partners with an assigned Engineering Partner Manager (EPM) are migrated in late September as per pre-agreed dates. Bugs against components "kernel", "kernel-rt", and "kpatch" are only migrated if still in "NEW" or "ASSIGNED". If you cannot log in to RH Jira, please consult article #7032570. That failing, please send an e-mail to the RH Jira admins at rh-issues@redhat.com to troubleshoot your issue as a user management inquiry. The email creates a ServiceNow ticket with Red Hat. Individual Bugzilla bugs that are migrated will be moved to status "CLOSED", resolution "MIGRATED", and set with "MigratedToJIRA" in "Keywords". The link to the successor Jira issue will be found under "Links", have a little "two-footprint" icon next to it, and direct you to the "RHEL project" in Red Hat Jira (issue links are of type "https://issues.redhat.com/browse/RHEL-XXXX", where "X" is a digit). This same link will be available in a blue banner at the top of the page informing you that that bug has been migrated.
Description of problem:
Version-Release number of selected component (if applicable):
file-5.04-6.el6
How reproducible:
always
Steps to Reproduce:
# rpm -ql perl | grep -F .ph | xargs file
/usr/lib64/perl5/_h2ph_pre.ph: ASCII text
/usr/lib64/perl5/asm-generic/bitsperlong.ph: ASCII text
/usr/lib64/perl5/asm-generic/int-l64.ph: ASCII text
/usr/lib64/perl5/asm-generic/int-ll64.ph: ASCII text
/usr/lib64/perl5/asm-generic/ioctl.ph: ASCII text
/usr/lib64/perl5/asm/auxvec.ph: ASCII text
/usr/lib64/perl5/asm/bitsperlong.ph: ASCII text
/usr/lib64/perl5/asm/cputable.ph: ASCII text
/usr/lib64/perl5/asm/elf.ph: ASCII text, with very long lines
/usr/lib64/perl5/asm/ioctl.ph: ASCII text
/usr/lib64/perl5/asm/ioctls.ph: ASCII text
...
Actual results:
Expected results:
I'm not sure it will be possible to improve Perl recognition significantly, because Perl doesn't have so unique syntax in comparison with other languages.
The only thing I can probably do is to check if the file ends with "1;", because that's what usually perl headers do, but I don't believe it would be accepted by upstream.
I'll keep it open for a while and be thinking more about it.
After some discussions with people who know Perl better than me I think there's no way how to significantly improve File Perl patterns and don't break detection of other scripting languages. Closing this as WONTFIX.