Ngoài việc cố gắng
perldoc <module name>
riêng cho bất kỳ mô-đun CPAN nào mà tôi yêu thích hoặc đi qua hệ thống tệp và xem các thư mục, tôi không biết chúng tôi đã cài đặt những mô-đun nào.
Cách dễ nhất để chỉ có một danh sách lớn mọi mô-đun CPAN đã được cài đặt là gì? Từ dòng lệnh hoặc cách khác.
cpan -lcó ích cho bản thân trên windows.
instmodsh
Câu trả lời:
Điều này được trả lời trong Câu hỏi thường gặp về Perl, câu trả lời có thể được tìm thấy nhanh chóng với perldoc -q installed. Trong ngắn hạn, nó liên quan đến việc sử dụng ExtUtils::Installedhoặc sử dụng File::Find, các biến thể của cả hai đều đã được đề cập trước đó trong chủ đề này.
Bạn cũng có thể tìm thấy mục Câu hỏi thường gặp "Làm cách nào để tìm mô-đun nào được cài đặt trên hệ thống của tôi?" trong perlfaq3. Bạn có thể xem danh sách tất cả các câu trả lời Câu hỏi thường gặp bằng cách xem trong perlfaq
ExtUtils::Installedcủa constructor skip_cwdtùy chọn từ dòng lệnh?
cpan -lnhưng điều đó không hoạt động trên RHEL6 và /usr/bin/cpan -llỗi Unknown option: l.
perldoc perllocal
Chỉnh sửa: Có thêm (một chút) thông tin về nó trong Câu hỏi thường gặp về CPAN
perldoc -q installed
tuyên bố điều đó cpan -lsẽ thực hiện thủ thuật, tuy nhiên nó không hiệu quả với tôi. Các tùy chọn khác:
cpan -a
không tạo ra một danh sách đẹp các gói đã cài đặt và có tác dụng phụ tốt là ghi chúng vào một tệp.
cpan -lhoạt động (hoặc với tôi với CPAN v2.05). cpan -athực sự là đẹp hơn.
Cần lưu ý rằng perldoc perllocal sẽ chỉ báo cáo về các mô-đun được cài đặt qua CPAN. Nếu ai đó cài đặt các mô-đun theo cách thủ công, nó sẽ không tìm thấy chúng. Ngoài ra, nếu bạn có nhiều người cài đặt mô-đun và perllocal.pod được kiểm soát nguồn, mọi người có thể giải quyết xung đột không chính xác và làm hỏng danh sách (ví dụ: điều này đã xảy ra ở đây tại nơi làm việc).
Rất tiếc, giải pháp dường như đang đi qua @INC với File :: Find hoặc thứ gì đó tương tự. Tuy nhiên, điều đó không chỉ tìm thấy các mô-đun, nó còn tìm thấy các mô-đun liên quan trong một bản phân phối. Ví dụ: nó sẽ báo cáo TAP :: Harness và TAP :: Parser ngoài tên phân phối thực tế của Test :: Harness (giả sử bạn có phiên bản 3 trở lên). Bạn có thể đối sánh chúng với tên phân phối và loại bỏ những tên không khớp, nhưng sau đó bạn có thể loại bỏ các mô-đun được xây dựng và cài đặt cục bộ.
Tôi tin rằng công việc lập chỉ mục backpan của brian d foy được cho là có mã để chuyển nó ở tệp .pm và nó sẽ cố gắng suy ra phân phối, nhưng thậm chí điều này đôi khi không thành công vì những gì trong một gói không nhất thiết phải được cài đặt (xem Devel :: Cover :: Inc làm ví dụ).
$ 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".
Bạn có thể thử ExtUtils-Installed , nhưng điều đó chỉ xem trong .packlists, vì vậy nó có thể bỏ sót các mô-đun mà mọi người đã chuyển mọi thứ vào @INCbằng tay.
Tôi đã viết App-Module-Lister cho một người bạn muốn làm điều này dưới dạng tập lệnh CGI trên tài khoản lưu trữ web không shell. Bạn chỉ cần lấy tệp mô-đun và tải nó lên dưới dạng tên tệp mà máy chủ của bạn sẽ coi như một tập lệnh CGI. Nó không có phụ thuộc bên ngoài Thư viện Chuẩn. Sử dụng nó như cũ hoặc ăn cắp mã.
Nó xuất ra danh sách các mô-đun và các phiên bản của chúng:
Tie :: Chu kỳ 1.15 Tie :: IxHash 1.21 Tie :: Toggle 1.07 Tie :: ToObject 0.03 Thời gian :: CTime 99.062201 Thời gian :: DaysInMonth 99.1117 Thời gian :: Kỷ nguyên 0,02 Thời gian :: Mờ 0,34 Thời gian :: JulianDay 2003.1125 Thời gian :: ParseDate 2006.0814 Thời gian :: Múi giờ 2006.0814
Tôi đã có ý định thêm điều này như một tính năng vào cpancông cụ, vì vậy tôi cũng sẽ làm điều đó. [Thời gian trôi qua] Và, bây giờ tôi có một -lcông tắc trong cpan. Tôi có một số việc khác phải làm với nó trước khi phát hành, nhưng nó nằm trong github . Nếu bạn không muốn chờ đợi điều đó, bạn có thể thử -achuyển đổi để tạo một nhóm tự động, mặc dù điều đó đặt một số Pod xung quanh danh sách.
Chúc may mắn;
Đây là một tập lệnh sẽ thực hiện thủ thuật:
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 Mô-đun không được liệt kê.
Tôi thích sử dụng lệnh CPAN 'r' cho việc này. Bạn có thể vào shell CPAN với kiểu cũ:
sudo perl -MCPAN -e shell
hoặc, trên hầu hết các hệ thống mới hơn, có lệnh 'cpan', vì vậy lệnh này sẽ đưa bạn đến trình bao:
sudo cpan
(Bạn thường phải sử dụng 'sudo' để chạy nó dưới dạng root hoặc sử dụng 'su -' để trở thành root trước khi bạn chạy nó, trừ khi bạn đã thiết lập cpan để cho phép bạn chạy nó như một người dùng bình thường, nhưng cài đặt dưới dạng root. Nếu bạn chưa root trên máy này, bạn vẫn có thể sử dụng shell CPAN để tìm hiểu thông tin này, nhưng bạn sẽ không thể cài đặt các mô-đun và bạn có thể phải thực hiện một chút thiết lập trong lần đầu tiên. chạy nó.)
Sau đó, khi bạn đang ở trong trình bao cpan, bạn có thể sử dụng lệnh 'r' để báo cáo tất cả các mô-đun đã cài đặt và phiên bản của chúng. Vì vậy, tại dấu nhắc "cpan>", hãy nhập 'r'. Điều này sẽ liệt kê tất cả các mô-đun đã cài đặt và các phiên bản của chúng. Sử dụng '?' để được trợ giúp thêm.
sudoở đây? Nó hoàn toàn không cần thiết.
Đây là một cách thực sự khó thực hiện trong * nix, bạn sẽ nhận được một số thứ mà bạn không thực sự quan tâm (ví dụ: cảnh báo :: đăng ký, v.v.), nhưng nó sẽ cung cấp cho bạn danh sách mọi tệp .pm có thể truy cập qua perl.
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'
*.pmmô-đun. Bạn có thể thấy nhiều bản sao ...
Bạn có thể nhận danh sách các mô-đun perl được cài đặt trong hệ thống của bạn bằng cách sử dụng instmodshlệnh trong thiết bị đầu cuối của bạn. Nó sẽ yêu cầu bạn ba tùy chọn để nâng cao đầu ra của chúng:
l - List all installed modules
m <module> - Select a module
q - Quit the program
Trên Linux / Unix, tôi sử dụng lệnh đơn giản sau:
perl -e 'print qx/find $_ -name "*.pm"/ foreach ( @INC );'
Nó quét tất cả thư mục trong @INCvà tìm kiếm bất kỳ tệp * .pm nào.
Hãy thử lệnh sau
instmodsh
Câu trả lời có thể được tìm thấy trong danh sách Câu hỏi thường gặp về Perl .
Bạn nên đọc lướt các tài liệu tuyệt vời đi kèm với Perl
perldoc perltoc
Tôi đã viết một kịch bản perl chỉ ngày hôm qua để làm chính xác điều này. Tập lệnh trả về danh sách các mô-đun perl được cài đặt trong @INC bằng cách sử dụng '::' làm dấu phân tách. Gọi tập lệnh bằng -
perl perlmod.pl
HOẶC LÀ
perl perlmod.pl <module name> #Case-insensitive(eg. perl perlmod.pl ftp)
Hiện tại, tập lệnh sẽ bỏ qua thư mục hiện tại ('.') Vì tôi gặp sự cố với các liên kết mềm đệ quy nhưng bạn có thể bao gồm nó bằng cách thay đổi hàm grep trong dòng 17 từ
grep { $_ !~ '^\.$' } @INC
chỉ,
@INC
Kịch bản có thể được tìm thấy ở đây.
Đây là một công cụ dòng lệnh khác để liệt kê tất cả các tệp .pm đã cài đặt:
Tìm các mô-đun Perl đã cài đặt khớp với một biểu thức chính quy
Để xem qua các cây thư mục @INC mà không cần sử dụng một chương trình bên ngoài như ls (1), người ta có thể sử dụng File::Find::Rulemô-đun có giao diện khai báo đẹp mắt.
Ngoài ra, bạn muốn lọc ra các bản sao trong trường hợp các phiên bản Perl trước đó chứa các mô-đun giống nhau. Mã để thực hiện việc này trông giống như:
#! /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}++;
}
}
Vào cuối quá trình chạy, bạn cũng có tất cả các tên mô-đun của mình dưới dạng các khóa trong băm% saw. Mã có thể được điều chỉnh để lưu tên tệp chuẩn (được cung cấp trong tệp $) làm giá trị của khóa thay vì số lần được nhìn thấy.
Tất cả những người không thể cài đặt perldoc hoặc các mô-đun khác, và muốn biết những mô-đun nào có sẵn (CPAN hoặc cách khác), các cách sau hoạt động cho linux và Mingw32 / 64:
grep -RhIP '^package [A-Z][\w:]+;' `perl -e 'print join " ",@INC'` | sed 's/package //' | sort | uniq
Vâng, nó lộn xộn. Có, nó có thể báo cáo nhiều hơn bạn muốn. Nhưng nếu bạn chuyển nó thành một tệp, bạn có thể dễ dàng kiểm tra, chẳng hạn như giao diện dbm nào hiện có:
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;
Đó là lý do tại sao tôi kết thúc trên trang này (thất vọng)
(Tôi nhận ra rằng điều này không trả lời chính xác câu hỏi của OP, nhưng tôi đăng nó cho bất kỳ ai đã kết thúc ở đây vì lý do tương tự như tôi đã làm. Đó là vấn đề với ngăn xếp ***, gần như không thể tìm ra câu hỏi của bạn. yêu cầu, ngay cả khi nó tồn tại, nhưng ngăn xếp *** gần như luôn là hit hàng đầu của google!)
sách dạy nấu ăn Perl chứa một số lần lặp lại của một tập lệnh "pmdesc" thực hiện những gì bạn muốn. Tìm kiếm trên Google cho "Perl Cookbook pmdesc" và bạn sẽ tìm thấy các bài viết trên các Trang web Hỏi & Đáp khác , một số danh sách mã trên mạng, thảo luận về giải pháp và thậm chí là một số sàng lọc .
Đây là một lớp lót Perl sẽ in ra danh sách các mô-đun đã cài đặt:
perl -MExtUtils::Installed -MData::Dumper -e 'my ($inst) = ExtUtils::Installed->new(); print Dumper($inst->modules());'
Chỉ cần đảm bảo rằng bạn đã cài đặt Data :: Dumper.
Đây là một kịch bản của @ JamesThomasMoon1979 được viết lại dưới dạng một lớp lót
perl -MExtUtils::Installed -e '$i=ExtUtils::Installed->new();
print "$_ ".$i->version($_)."\n" for $i->modules();'
Khi bạn nhập tập lệnh Perl của mình, bạn có tất cả các mô-đun đã cài đặt dưới dạng tệp .pm bên dưới các thư mục trong @INC vì vậy một tập lệnh bash nhỏ sẽ thực hiện công việc cho bạn:
#!/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'
Đối với Linux, cách dễ nhất để có được là,
dpkg -l | grep "perl"
Điều này phù hợp với tôi
perl -e 'print join("\n",@INC,"")'
Đây là những gì tôi làm: perl -M{cpan_module}
Nếu bạn không nhận được bất kỳ lỗi nào thì rất có thể mô-đun đã được cài đặt.