Bug 2116592
| Summary: | Use of uninitialized value $w in numeric gt (>) at /usr/lib64/perl5/vendor_perl/Cyrus/IMAP/Shell.pm line 676. | ||
|---|---|---|---|
| Product: | Red Hat Enterprise Linux 9 | Reporter: | Ravindra Patil <ravpatil> |
| Component: | cyrus-imapd | Assignee: | Martin Osvald 🛹 <mosvald> |
| Status: | ASSIGNED --- | QA Contact: | František Hrdina <fhrdina> |
| Severity: | low | Docs Contact: | |
| Priority: | unspecified | ||
| Version: | 9.0 | CC: | fhrdina, gnaik |
| Target Milestone: | rc | Keywords: | Triaged |
| Target Release: | --- | ||
| Hardware: | x86_64 | ||
| OS: | Linux | ||
| Whiteboard: | |||
| Fixed In Version: | Doc Type: | If docs needed, set a value | |
| Doc Text: | Story Points: | --- | |
| Clone Of: | Environment: | ||
| Last Closed: | Type: | Bug | |
| Regression: | --- | Mount Type: | --- |
| Documentation: | --- | CRM: | |
| Verified Versions: | Category: | --- | |
| oVirt Team: | --- | RHEL 7.3 requirements from Atomic Host: | |
| Cloudforms Team: | --- | Target Upstream Version: | |
| Embargoed: | |||
Description of problem: On installing cryus-imapd and after runnimg lm (list mailboxes) in cyradm the following warning occurs: ::1> lm Use of uninitialized value $w in numeric gt (>) at /usr/lib64/perl5/vendor_perl/Cyrus/IMAP/Shell.pm line 676. The mail boxes are listed and works as expected. The perl script reporting issue is provided through perl-cyrus $ rpm -qf /usr/lib64/perl5/vendor_perl/Cyrus/IMAP/Shell.pm perl-Cyrus-3.4.1-6.el9.x86_64 The code snippet from Shell.pm # cat /usr/lib64/perl5/vendor_perl/Cyrus/IMAP/Shell.pm 668 foreach my $mbx (@res) { 669 $l = $mbx->[0]; 670 if ($mbx->[1] ne '') { 671 $l .= ' (' . $mbx->[1] . ')'; 672 } 673 if (defined ($mbx->[3])) { 674 $l .= ' (' . $mbx->[3] . ')'; 675 } 676 if (length($l) + 1 > $w) { <<< $w is being called or used without being initialised 677 $w = length($l) + 1; Version-Release number of selected component (if applicable): perl-Cyrus-3.4.1-6.el9.x86_64 How reproducible: Use cryadm command and list mailboxes on the server. Steps to Reproduce: 1. Install cyrus-imapd, as dependencey perl-Cyrus is installed. 2. Connect using cyradm command. 3. List mailboxes Actual results: - Getting warning in lm command. Use of uninitialized value $w in numeric gt (>) at /usr/lib64/perl5/vendor_perl/Cyrus/IMAP/Shell.pm line 676. Which confuses non-perl programmers. Expected results: - There should not be such warning to avoid any confusion. Additional info: