用 IE 来浏览 perldoc

lonelyair

UID: 41707
帖子: 141
积分: 324
在线时间: 1 天 3 小时

1^# lonelyair 发表于 2007-12-26 16:05

用 IE 来浏览 perldoc

http://www.fayland.org/journal/perldoc_ie.html
转载过来的,以后看文档有色彩了,perl果真很不错,
======================================================================================================
Category: Script Keywords: perldoc

perldoc 黑忽忽的界面浏览起来不是很方便。我一向习惯用浏览器来浏览 perldoc, 但当我安装了很多模块的时候，perldoc 的 TOC/Table Of Content 将变得很长，找一个想要的模块将要拉很长的浏览器，比较不方便。
于是写了一个简单的文件用 IE 浏览器打开模块 html 文件。

[Copy to clipboard] [ - ]

CODE:

#!/usr/bin/perl
use strict;
use Config;
use File::Spec;
my ($module) = @ARGV;
die 'not a module' unless ($module =~ /^[\w\:]+$/);
# determine it weather it is in /lib or /site/lib
my $file = File::Spec->catfile($Config{installhtmldir}, 'lib', split(/\:+/, $module)) . '.html';
$file = File::Spec->catfile($Config{installhtmldir}, 'site', 'lib', split(/\:+/, $module)) . '.html' unless (-e $file);
# if not in /lib and site/lib, check the lib/Pod, for such as perlfunc
$file = File::Spec->catfile($Config{installhtmldir}, 'lib', 'Pod', split(/\:+/, $module)) . '.html' unless (-e $file);
# and /bin
$file = File::Spec->catfile($Config{installhtmldir}, 'bin', split(/\:+/, $module)) . '.html' unless (-e $file);die 'no such html' unless (-e $file);`"C:/Program Files/Internet Explorer/IEXPLORE.EXE" $file`;

再用 pl2bat 将其转化为 bat 文件

[Copy to clipboard] [ - ]

CODE:

pl2bat pd.pl

最后将这个 bat 文件拖进某 PATH 目录下就可以了。
这下我们可以用

[Copy to clipboard] [ - ]

CODE:

pd Module::Build

来打开 Module::Build 的 html 文件。

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

2^# flw 发表于 2007-12-26 16:11

我一直搞不懂 pl2bat 是干嘛使的。

lonelyair

UID: 41707
帖子: 141
积分: 324
在线时间: 1 天 3 小时

3^# lonelyair 发表于 2007-12-26 16:22

感觉是为了没装perl的机上用吧,
可以任意拷贝,
windows下批处理的天下嘛.

Nosferatu

UID: 5185
帖子: 94
积分: 216
在线时间: 12 小时

4^# Nosferatu 发表于 2007-12-26 16:25

QUOTE:

原帖由 lonelyair 于 2007-12-26 16:22 发表
感觉是为了没装perl的机上用吧,
可以任意拷贝,
windows下批处理的天下嘛.

转成的bat还是需要perl的

lonelyair

UID: 41707
帖子: 141
积分: 324
在线时间: 1 天 3 小时

5^# lonelyair 发表于 2007-12-26 17:27

是啊,我的错,没有perl怎么看perldoc啊.
那这个批处理有点多余,不过可心学习下,怎么样从perl script　*.pl 到 *.bat.

lvlfforever

UID: 9630
帖子: 160
积分: 368
在线时间: 1 天 11 小时

6^# lvlfforever 发表于 2007-12-27 13:00

我就用 http://perldoc.perl.org/

no.pity

UID: 32085
帖子: 4
积分: 9
在线时间: 10 分钟

7^# no.pity 发表于 2007-12-31 04:45

在windows里就用ActivePerl。