$sep = unpack "H*", $sep // ""; #### $ find site_perl/5.28.0 -name \*.pm | wc -l 11735 $ find site_perl/5.28.0 -name \*.pl | wc -l 900 $ find site_perl/5.28.0 -name \*.p[lm] | xargs cat | wc -l 5246249 $ perl -nE'/^=head2.*L<(.*?)\|/ and$x{$1}++;END{say scalar keys %x}' 5.28.0/x86_64-linux-thread-multi-ld/perllocal.pod 1483