in reply to Re^5: diagnostics pragma throwing a compile-time error in Cygwin-Perl
in thread diagnostics pragma throwing a compile-time error in Cygwin-Perl

choroba asked yesterday:
Wait, doesn't cygwin have a separate package for Perl documentation?

No, I don't think so (and I checked, using the `cygcheck' tool). It has perl-Pod-Perldoc shown below. Maybe you are thinking of many Gnu/Linux distros, where there is a separate Perl documentation package.

$ cygcheck -i perl-Pod-Perldoc
Installed package:
------------------

Name        : perl-Pod-Perldoc
Version     : 3.28
Release     : 4
Architecture: noarch
Install Date: Tue Sep 03 16:32:09 2024
Size        : 65829 (64 K)
Categories  : Perl
Source      : perl-Pod-Perldoc-3.28-4-src.tar.zst
Summary     : Perl distribution Pod-Perldoc
Description :
Perl distribution Pod-Perldoc, providing Perl modules:
Pod::Perldoc Pod::Perldoc::BaseTo Pod::Perldoc::GetOptsOO
Pod::Perldoc::ToANSI Pod::Perldoc::ToChecker Pod::Perldoc::ToMan
Pod::Perldoc::ToNroff Pod::Perldoc::ToPod Pod::Perldoc::ToRtf
Pod::Perldoc::ToTerm Pod::Perldoc::ToText Pod::Perldoc::ToTk
Pod::Perldoc::ToXml.
Apr 17, 2025 at 17:19 UTC
  • Comment on Re^6: diagnostics pragma throwing a compile-time error in Cygwin-Perl

Replies are listed 'Best First'.
Re^7: diagnostics pragma throwing a compile-time error in Cygwin-Perl
by choroba (Cardinal) on Apr 17, 2025 at 17:29 UTC
    And what's this, then?

    map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

      Drat!! Confungalate! His* fu is stronger than my fu. But I will have my revenge!;-)

      Heh heh. That's absolutely correct. Cygwin package perl_pods contains /usr/share/perl5/5.40/pods/perldiag.pod. I think, that is, imho, cavac, based on this investigation, a strong argument could be made for refraining from use diagnostics; in released modules. A pretty strong argument could also be made that the implementation of diagnostics is weird and obscurist ;-)

      *choroba

      Apr 17, 2025 at 19:31 UTC

      A just machine to make big decisions
      Programmed by fellows (and gals) with compassion and vision
      We'll be clean when their work is done
      We'll be eternally free yes, and eternally young
      Donald Fagen —> I.G.Y.
      (Slightly modified for inclusiveness)

        I'd rather say it's a strong argument against various distributions/systems' broken packaging of Perl in a non-standard way.

        map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]