echo pml is module names list
pminst >pml
echo pmlf is module filenames list
pminst -l >pmlf
echo pmlfl is name tabspace filename
paste pml pmlf >pmlfl

grep "^CGI::S[^:]*$" pml
grep "CGI/S[^/]*$" pmlf
grep -P "^CGI::S\w+$" pml
grep -P "^CGI::S\w+\t" pmlfl

perl -lne "print $_ if /^CGI(::\w+)$/" pml
perl -lne "print $_ if m!CGI/S[^/]*$!" pmlf
perl -lne "print $_ if /^CGI(::\w+)\t/" pmlfl


##</code><code>##

D:\>pminst Wx$

##</code><code>##

D:\>pminst Wx.pm$
Wx
MSWin32-x86-multi-thread::Wx

D:\>perl -le"print for @INC"
C:/perl/5.10.1/lib/MSWin32-x86-multi-thread
C:/perl/5.10.1/lib
C:/perl/site/5.10.1/lib/MSWin32-x86-multi-thread
C:/perl/site/5.10.1/lib
.