2007-10-25から1日間の記事一覧

perlのインストールモジュールを調べる

#! /usr/bin/perl use strict; my %mod_list; listup($_) for grep {$_ ne '.'} @INC; #print "$_?n" for sort keys %mod_list; print "$_\n" for sort keys %mod_list; sub listup { my ($base, $path) = @_; # (my $mod = $path) =? s!/!::!g; (my $mod = …