นอกเหนือจากการพยายาม
perldoc <module name>
เป็นรายบุคคลสำหรับโมดูล CPAN ใด ๆ ที่ใช้จินตนาการของฉันหรือผ่านระบบไฟล์และดูที่ไดเร็กทอรีฉันไม่รู้ว่าเราติดตั้งโมดูลอะไร
วิธีใดที่ง่ายที่สุดในการรับรายการโมดูล CPAN ทั้งหมดที่ติดตั้งไว้ จากบรรทัดคำสั่งหรืออย่างอื่น
cpan -lมีประโยชน์สำหรับตัวเองบน windows
instmodsh
คำตอบ:
นี้เป็นคำตอบในคำถามที่พบบ่อย Perl perldoc -q installedคำตอบซึ่งสามารถพบได้อย่างรวดเร็วด้วย กล่าวโดยย่อคือการใช้ExtUtils::Installedหรือการใช้File::Findงานตัวแปรของทั้งสองอย่างที่กล่าวถึงก่อนหน้านี้ในหัวข้อนี้
คุณยังสามารถดูรายการคำถามที่พบบ่อย"ฉันจะค้นหาโมดูลที่ติดตั้งในระบบของฉันได้อย่างไร" ใน perlfaq3 คุณสามารถดูรายการคำตอบของ FAQ ทั้งหมดได้โดยดูในperlfaq
ExtUtils::Installedของskip_cwdตัวสร้างจากบรรทัดคำสั่งนั้น?
cpan -lแต่ไม่ได้ทำงานใน RHEL6 และโยนข้อผิดพลาด/usr/bin/cpan -l Unknown option: l
perldoc perllocal
แก้ไข: มีข้อมูลเพิ่มเติม (เล็กน้อย) เกี่ยวกับเรื่องนี้ในคำถามที่พบบ่อยเกี่ยวกับCPAN
perldoc -q installed
อ้างว่าcpan -lจะทำเคล็ดลับ แต่มันไม่ได้ผลสำหรับฉัน ตัวเลือกอื่น ๆ :
cpan -a
ไม่พ่นรายการแพ็คเกจที่ติดตั้งออกมาและมีผลข้างเคียงที่ดีในการเขียนลงในไฟล์
cpan -lงานได้ (หรือทำสำหรับฉันด้วย CPAN v2.05) cpan -aสวยกว่าแน่นอน
เป็นที่น่าสังเกตว่า perldoc perllocal จะรายงานเฉพาะโมดูลที่ติดตั้งผ่าน CPAN หากมีคนติดตั้งโมดูลด้วยตนเองก็จะไม่พบโมดูลนั้น นอกจากนี้หากคุณมีหลายคนติดตั้งโมดูลและ perllocal.pod อยู่ภายใต้การควบคุมแหล่งที่มาผู้คนอาจแก้ไขข้อขัดแย้งไม่ถูกต้องและทำให้รายการเสียหาย (เช่นเกิดขึ้นที่นี่ในที่ทำงาน)
น่าเสียใจที่ดูเหมือนว่าโซลูชันจะเดินผ่าน @INC ด้วย File :: Find หรือสิ่งที่คล้ายกัน อย่างไรก็ตามไม่เพียงแค่ค้นหาโมดูลเท่านั้น แต่ยังพบโมดูลที่เกี่ยวข้องในการแจกจ่าย ตัวอย่างเช่นจะรายงาน TAP :: Harness และ TAP :: Parser นอกเหนือจากชื่อการแจกจ่ายจริงของ Test :: Harness (สมมติว่าคุณมีเวอร์ชัน 3 ขึ้นไป) คุณสามารถจับคู่กับชื่อการแจกจ่ายและทิ้งชื่อที่ไม่ตรงกัน แต่จากนั้นคุณอาจทิ้งโมดูลที่สร้างและติดตั้งไว้ในเครื่อง
ฉันเชื่อว่างานทำดัชนีแบ็คแพนของ brian d foy ควรมีโค้ดสำหรับส่งที่ไฟล์. pm และจะพยายามสรุปการแจกจ่าย แต่แม้บางครั้งก็ล้มเหลวเนื่องจากไม่จำเป็นต้องติดตั้งสิ่งที่อยู่ในแพ็คเกจ (ดู Devel :: Cover :: Inc เป็นตัวอย่าง)
$ for M in `perldoc -t perllocal|grep Module |sed -e 's/^.*" //'`; do V=`perldoc -t perllocal|awk "/$M/{y=1;next}y" |grep VERSION |head -n 1`; printf "%30s %s\n" "$M" "$V"; done |sort
Class::Inspector * "VERSION: 1.28"
Crypt::CBC * "VERSION: 2.33"
Crypt::Rijndael * "VERSION: 1.11"
Data::Dump * "VERSION: 1.22"
DBD::Oracle * "VERSION: 1.68"
DBI * "VERSION: 1.630"
Digest::SHA * "VERSION: 5.92"
ExtUtils::MakeMaker * "VERSION: 6.84"
install * "VERSION: 6.84"
IO::SessionData * "VERSION: 1.03"
IO::Socket::SSL * "VERSION: 2.016"
JSON * "VERSION: 2.90"
MIME::Base64 * "VERSION: 3.14"
MIME::Base64 * "VERSION: 3.14"
Mozilla::CA * "VERSION: 20141217"
Net::SSLeay * "VERSION: 1.68"
parent * "VERSION: 0.228"
REST::Client * "VERSION: 271"
SOAP::Lite * "VERSION: 1.08"
Task::Weaken * "VERSION: 1.04"
Term::ReadKey * "VERSION: 2.31"
Test::Manifest * "VERSION: 1.23"
Test::Simple * "VERSION: 1.001002"
Text::CSV_XS * "VERSION: 1.16"
Try::Tiny * "VERSION: 0.22"
XML::LibXML * "VERSION: 2.0108"
XML::NamespaceSupport * "VERSION: 1.11"
XML::SAX::Base * "VERSION: 1.08"
No documentation found for "perllocal".
คุณสามารถลองติดตั้ง ExtUtils ได้แต่จะดูเฉพาะใน.packlists ดังนั้นจึงอาจพลาดโมดูลที่ผู้คนเคลื่อนย้ายสิ่งของ@INCด้วยมือ
ฉันเขียนApp-Module-Listerสำหรับเพื่อนที่ต้องการทำสิ่งนี้เป็นสคริปต์ CGI บนบัญชีเว็บโฮสติ้งที่ไม่ใช่เชลล์ คุณใช้ไฟล์โมดูลและอัปโหลดเป็นชื่อไฟล์ที่เซิร์ฟเวอร์ของคุณจะถือว่าเป็นสคริปต์ CGI ไม่มีการอ้างอิงนอกไลบรารีมาตรฐาน ใช้ตามที่เป็นอยู่หรือขโมยรหัส
แสดงรายการโมดูลและเวอร์ชัน:
Tie :: รอบ 1.15 เสมอ :: IxHash 1.21 ผูก :: สลับ 1.07 เสมอ :: ToObject 0.03 เวลา :: CTime 99.062201 เวลา :: DaysInMonth 99.1117 เวลา :: ยุค 0.02 เวลา :: เลือน 0.34 เวลา :: JulianDay 2003.1125 เวลา :: ParseDate 2006.0814 เวลา :: เขตเวลา 2549.0814
ฉันตั้งใจจะเพิ่มสิ่งนี้เป็นคุณสมบัติให้กับcpanเครื่องมือดังนั้นฉันจะทำเช่นนั้นด้วย [เวลาผ่าน] และตอนนี้ผมมีสวิทช์ใน-l cpanฉันมีสิ่งอื่น ๆ น้อยจะทำอย่างไรกับมันก่อนที่ผมจะต้องมีการปลดปล่อย แต่มันอยู่ใน GitHub หากคุณไม่ต้องการรอเพียงแค่ลองใช้-aสวิตช์เพื่อสร้างการรวมกลุ่มอัตโนมัติแม้ว่าจะมี Pod อยู่รอบ ๆ รายการก็ตาม
โชคดี;
นี่คือสคริปต์ที่จะทำเคล็ดลับ:
use ExtUtils::Installed;
my $inst = ExtUtils::Installed->new();
my @modules = $inst->modules();
foreach $module (@modules){
print $module ." - ". $inst->version($module). "\n";
}
=head1 ABOUT
This scripts lists installed cpan modules using the ExtUtils modules
=head1 FORMAT
Prints each module in the following format
<name> - <version>
=cut
Perl - 5.10.1 โมดูลไม่อยู่ในรายการ
ฉันชอบใช้คำสั่ง CPAN 'r' สำหรับสิ่งนี้ คุณสามารถเข้าสู่เชลล์ CPAN ด้วยรูปแบบเก่า:
sudo perl -MCPAN -e shell
หรือในระบบที่ใหม่กว่าส่วนใหญ่จะมีคำสั่ง 'cpan' ดังนั้นคำสั่งนี้จะนำคุณไปสู่เชลล์:
sudo cpan
(โดยทั่วไปคุณต้องใช้ 'sudo' เพื่อเรียกใช้ในฐานะรูทหรือใช้ 'su -' เพื่อกลายเป็นรูทก่อนที่คุณจะเรียกใช้เว้นแต่คุณจะตั้งค่า cpan เพื่อให้คุณเรียกใช้ในฐานะผู้ใช้ปกติ แต่ติดตั้งเป็นรูท หากคุณไม่มีรูทในเครื่องนี้คุณยังสามารถใช้เชลล์ CPAN เพื่อค้นหาข้อมูลนี้ได้ แต่คุณจะไม่สามารถติดตั้งโมดูลได้และคุณอาจต้องผ่านการตั้งค่าเล็กน้อยในครั้งแรกที่คุณ เรียกใช้)
จากนั้นเมื่อคุณอยู่ใน cpan shell แล้วคุณสามารถใช้คำสั่ง 'r' เพื่อรายงานโมดูลที่ติดตั้งและเวอร์ชันทั้งหมด ดังนั้นที่พรอมต์ "cpan>" ให้พิมพ์ 'r' นี่จะแสดงรายการโมดูลที่ติดตั้งและเวอร์ชันทั้งหมด ใช้ "?" เพื่อรับความช่วยเหลือเพิ่มเติม
sudoที่นี่? มันไม่จำเป็นโดยสิ้นเชิง
นี่เป็นวิธีแฮ็กจริงๆใน * nix คุณจะได้รับบางสิ่งที่คุณไม่สนใจจริงๆ (เช่นคำเตือน :: register ฯลฯ ) แต่ควรให้รายการไฟล์. pm ทุกไฟล์ที่สามารถเข้าถึงได้ผ่าน เพิร์ล
for my $path (@INC) {
my @list = `ls -R $path/**/*.pm`;
for (@list) {
s/$path\///g;
s/\//::/g;
s/\.pm$//g;
print;
}
}
perl -MFile::Find=find -MFile::Spec::Functions -Tlwe 'find { wanted => sub { print canonpath $_ if /\.pm\z/ }, no_chdir => 1 }, @INC'
*.pmโมดูลอย่างชัดเจน คุณอาจเห็นรายการที่ซ้ำกันมากมาย ...
คุณสามารถรับรายชื่อโมดูล perl ที่ติดตั้งในระบบของคุณได้โดยใช้instmodshคำสั่งในเทอร์มินัลของคุณมันจะถามคุณสามตัวเลือกเพื่อปรับปรุงผลลัพธ์คือ:
l - List all installed modules
m <module> - Select a module
q - Quit the program
ลองใช้คำสั่งต่อไปนี้
instmodsh
คำตอบที่สามารถพบได้ในPerl คำถามที่พบบ่อยรายการ
คุณควรอ่านเอกสารที่ดีเยี่ยมที่มาพร้อมกับ Perl
perldoc perltoc
ลองman perllocalหรือperldoc perllocal.
ทุกคนที่ไม่สามารถติดตั้ง perldoc หรือโมดูลอื่น ๆ และต้องการทราบว่ามีโมดูลอะไรบ้าง (CPAN หรืออื่น ๆ ) สิ่งต่อไปนี้ใช้ได้กับ linux และ Mingw32 / 64:
grep -RhIP '^package [A-Z][\w:]+;' `perl -e 'print join " ",@INC'` | sed 's/package //' | sort | uniq
ใช่มันยุ่ง ใช่อาจรายงานมากกว่าที่คุณต้องการ แต่ถ้าคุณไพพ์มันลงในไฟล์คุณสามารถตรวจสอบได้อย่างง่ายดายว่าอินเทอร์เฟซ dbm ใดที่มีอยู่:
grep -RhIP '^package [A-Z][\w:]+;' `perl -e 'print join " ",@INC'` | sed 's/package //' | sort | uniq > modules-installed
cat modules-installed | grep -i dbm
AnyDBM_File;
Memoize::AnyDBM_File;
Memoize::NDBM_File;
Memoize::SDBM_File;
WWW::RobotRules::AnyDBM_File;
ซึ่งเป็นเหตุผลว่าทำไมฉันจึงลงเอยที่หน้านี้ (ผิดหวัง)
(ฉันรู้ว่านี่ไม่ได้ตอบคำถามของ OP อย่างตรงไปตรงมา แต่ฉันโพสต์ไว้สำหรับใครก็ตามที่ลงเอยที่นี่ด้วยเหตุผลเดียวกับที่ฉันทำนั่นคือปัญหาของ stack *** มันแทบจะทำให้ไม่สามารถค้นหาคำถามที่คุณได้ ถามแม้ว่าจะมีอยู่ แต่กอง *** ก็เกือบจะเป็นยอดนิยมของ Google เสมอ!)
ฉันเขียนสคริปต์ perl เมื่อวานนี้เพื่อทำสิ่งนี้ สคริปต์ส่งคืนรายการของโมดูล perl ที่ติดตั้งใน @INC โดยใช้ '::' เป็นตัวคั่น เรียกสคริปต์โดยใช้ -
perl perlmod.pl
หรือ
perl perlmod.pl <module name> #Case-insensitive(eg. perl perlmod.pl ftp)
ณ ตอนนี้สคริปต์จะข้ามไดเร็กทอรีปัจจุบัน (".") เนื่องจากฉันมีปัญหากับการเรียกซอฟต์ลิงก์ซ้ำ แต่คุณสามารถรวมไว้ได้โดยเปลี่ยนฟังก์ชัน grep ในบรรทัดที่ 17 จาก
grep { $_ !~ '^\.$' } @INC
เป็นเพียง
@INC
สคริปต์สามารถพบได้ที่นี่
นี่คือเครื่องมือบรรทัดคำสั่งอื่นในการแสดงรายการไฟล์. pm ที่ติดตั้งทั้งหมด:
ค้นหาโมดูล Perl ที่ติดตั้งที่ตรงกับนิพจน์ทั่วไป
ในการเดินผ่านแผนผังไดเร็กทอรี @INC โดยไม่ใช้โปรแกรมภายนอกเช่น ls (1) เราสามารถใช้File::Find::Ruleโมดูลซึ่งมีอินเทอร์เฟซที่เปิดเผยได้ดี
นอกจากนี้คุณต้องการกรองรายการที่ซ้ำกันออกไปในกรณีที่ Perl เวอร์ชันก่อนหน้ามีโมดูลเดียวกัน โค้ดที่จะทำมีลักษณะดังนี้:
#! /usr/bin/perl -l
use strict;
use warnings;
use File::Find::Rule;
my %seen;
for my $path (@INC) {
for my $file (File::Find::Rule->name('*.pm')->in($path)) {
my $module = substr($file, length($path)+1);
$module =~ s/.pm$//;
$module =~ s{[\\/]}{::}g;
print $module unless $seen{$module}++;
}
}
ในตอนท้ายของการรันคุณยังมีชื่อโมดูลทั้งหมดของคุณเป็นคีย์ในแฮช% ที่เห็น โค้ดนี้สามารถดัดแปลงเพื่อบันทึกชื่อไฟล์ Canonical (กำหนดใน $ file) เป็นค่าของคีย์แทนการนับจำนวนครั้งที่เห็น
สิ่งต่อไปนี้ใช้ได้ผลสำหรับฉัน
$ perldoc perllocal | grep Module
$ perldoc perllocal | grep -E 'VERSION|Module'
นี่คือสคริปต์ของ @ JamesThomasMoon1979 ที่เขียนใหม่เป็นซับเดียว
perl -MExtUtils::Installed -e '$i=ExtUtils::Installed->new();
print "$_ ".$i->version($_)."\n" for $i->modules();'
ตำรา Perl ประกอบด้วยสคริปต์ "pmdesc" ที่ทำซ้ำหลายครั้งซึ่งทำสิ่งที่คุณต้องการ ที่ Google ค้นหา "Perl ตำรา pmdesc" และคุณจะพบบทความเกี่ยวกับ Q & A อื่น ๆ ไซต์รายชื่อหลายรหัสในสุทธิการอภิปรายของการแก้ปัญหาและแม้กระทั่งการปรับแต่งบางส่วน
นี่คือ Perl หนึ่งซับที่จะพิมพ์รายการโมดูลที่ติดตั้ง:
perl -MExtUtils::Installed -MData::Dumper -e 'my ($inst) = ExtUtils::Installed->new(); print Dumper($inst->modules());'
ตรวจสอบให้แน่ใจว่าคุณได้ติดตั้ง Data :: Dumper แล้ว
cd /the/lib/dir/of/your/perl/installation
perldoc $(find . -name perllocal.pod)
ผู้ใช้ Windows เพียงแค่ค้นหา Windows Explorer เพื่อค้นหา
ลองใช้ "perldoc -l":
บันทึก $ perldoc -l :: ส่ง /usr/local/share/perl/5.26.1/Log/Dispatch.pm
เมื่อคุณป้อนสคริปต์ Perl คุณจะมีโมดูลที่ติดตั้งทั้งหมดเป็นไฟล์. pm ด้านล่างโฟลเดอร์ใน @INC ดังนั้นสคริปต์ทุบตีขนาดเล็กจะทำงานให้คุณ:
#!/bin/bash
echo -e -n "Content-type: text/plain\n\n"
inc=`perl -e '$, = "\n"; print @INC;'`
for d in $inc
do
find $d -name '*.pm'
done
find `perl -le'print for@INC'` -name '*.pm'
สำหรับ Linux วิธีที่ง่ายที่สุดคือ
dpkg -l | grep "perl"
สิ่งนี้ใช้ได้กับฉัน
perl -e 'print join("\n",@INC,"")'
นี่คือสิ่งที่ฉันทำ: perl -M{cpan_module}
หากคุณไม่ได้รับข้อผิดพลาดใด ๆ มีโอกาสดีที่โมดูลจะถูกติดตั้ง