vipm Apache::Registry CGI
#or
vipm Apache/Registry.pm CGI.pm

##</code><code>##

#! /usr/bin/perl -w
#
# Find a module and edit it. Arguments should be either
# "Perl" style:     Apache::Registry
# or "path" style:  Apache/Registry.pm
#
# Any arguments starting with - are passed to editor unchanged.
#
foreach (@ARGV)
{
    next if /^-/;
    s|/|::|g if s/\.pm$//;
    eval "require $_" or die "Module $_ didn't load\n";
    s|::|/|g;
}
exec $ENV{EDITOR} || '/bin/vi', map {/^-/? $_ : $INC{$_ . '.pm'} } @ARGV;