[kansaipm] Re: [Q] M-x perldoc したい

maeda at tokyo.pm.org maeda at tokyo.pm.org
Wed Oct 4 06:18:55 CDT 2000


$BA0ED(B at Tokyo.pm$B$G$9!#(B

> man $B$N=PNO$9$k7A<0$r(B sed x 10 $B$"$s$I(B awk x 2 $B$/$i$$$N%U%#%k%?!<$G at 07A$7$F$$$k$h$&$G$9!#%7%g%(!<(B($B4@(B;

$B$=$&$G$9!#BgJQ$G$9!#(B

> perldoc $B$C$F%W%l!<%s$J=PNO$r$9$k$s$G$7$?$C$1!)(B

perldoc perldoc$B$r$*K:$l$G$7$g$&$+!#(B

perldoc$B$G(Bpod$B$r=PNO$7!"(Bpod2man$B$K?)$o$7$?$i$I$&$G$7$g$&!#!D!D$H!"(B
$B;W$C$?$i(B=head1 NAME$B$+$i;O$^$i$J$$$H=hM}$7$F$/$l$J$$$h$&$G$9!#(B

$B7k6I(Bperldoc -t$B$9$k$7$+$J$$$N$+$J$"!#(B

$B!D!D(B

$B$"$C!"(B5.6.0$BIUB0$N(Bpod2man$B$@$H2DG=$G$9$M!#(B

$B!D!D(B

$B$3$s$J4X?t:n$C$F$_$^$7$?$,!"(BM-! perldoc -t -q localtime$B$NJ}$,$h(B
$B$5$=$&$G$9!#(B

(defun perldoc (args)
  "Refer perldoc"
  (interactive "sLookup perldoc: \n")

  (let ((manual-program "perldoc -u ")
	(Man-filter-list (append '(("pod2man")
				   ("nroff -man"))
				 Man-filter-list)))
    (man args)))

# $B<B:]$K;H$C$F$$$k$N$O(BActivePerl build 616$B$J$N$G!"(B
# $BIaDL$N(B5.6.0$B$G$O$G$-$J$$$+$b!#$=$&$@$C$?$i$4$a$s$J$5$$!#(B

-------------------------------  Avatar          Md+   d/=$B""(B=\.   Md+
 $BA0ED(B $B70(B    maeda at tokyo.pm.org   75t 170km/h   AFC50  O \*oo*/ "  LG+ LG+
 Tokyo.pm  http://tokyo.pm.org   HeatSink 15   LRM10   .=X$B!1(BX=.   LRM10
-------------------------------  Armor 2164      Md+  _|_    _|_  Md+



More information about the Kansai-pm mailing list