http://yuanann.pixnet.net/blog <![CDATA[拉不拉多的夢幻世界:: PIXNET 痞客邦 ::]]> yuanann yuanann@not-valid.com 2008-11-18T18:09:59+08:00 2008-11-18T18:09:59+08:00 Copyright 2003-2008 yuanann,Pixnet Digital Media Coporation. All rights reserved. PIXNET Media Digital Coporation http://yuanann.pixnet.net/blog/post/22396433 <![CDATA[在VirtualBox設定分享目錄]]> 2008-11-18T18:09:59+08:00 本文要簡介在VirtualBox內的os 分享目錄

其實我也搞了很久,才成功的

網路上有很多教學,我也是參考別人的作法後,才畫出這張畫面的^^

按照這張圖就可以成功了.

最後一張圖是成功的畫面^^

2.PNG

 

2t.png

(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/22396433#comments http://yuanann.pixnet.net/blog/post/22366022 <![CDATA[用Notepad開發Perl程式]]> 2008-11-15T01:54:08+08:00 很多久沒有更新Blog了 ><

而今天要介紹用簡潔的編輯器(Notepad++)在Windows上面開發Perl程式.

請按此進入官網
找到下載專區 進去就可以看到下載點,此頁還有外掛(Plugin可以下載)
安裝方法很直覺,本文就不多介紹了.

開啟後,找到外掛模組>NppExec 點選Show Console Dialog  如下圖所示

用Notepad++寫了一個簡單的範例

open("file","a.txt") ;
while(<file>)
{
    print $_;
}
和一個文字檔,a.txt 內容如下

line 1 :a
line 2 :b
line 3 :c
將此二個檔放在c:\perl\bin 底下

另外在Console下面輸入下面的指令

cd c:\perl\bin

perl test.pl

請參閱下圖即可,這樣就可以不用像之前在Dos和Editor之間作交換了,省事方便很多.

Notepad++還有很多功能,值得好好品味一番.

 

 

 

 

 
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/22366022#comments http://yuanann.pixnet.net/blog/post/20660122 <![CDATA[Linux :basename小技巧]]> 2008-07-30T00:19:54+08:00 用簡單的範例來說明
取得/tmp/a.png 這個檔案名稱,請用以下指令
#basename /tmp/a.png
a.png
結果輸出就是a.png囉...
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/20660122#comments http://yuanann.pixnet.net/blog/post/20323203 <![CDATA[Linux :防毒軟體AVG ]]> 2008-07-22T22:40:21+08:00 這個防毒軟體有跨平台,Windows的很多網站有介紹了,在本文中,要介紹Linux 版的安裝與使用方法
AVG請按我下載
這裡也有rpm的檔案可以下載


連到這個網頁後,把檔案下載到local的電腦  本文介紹時版本為 AVG Free Linux 7.1.385
因為下載的是rpm檔,安裝很簡單,請用以下指令
rpm -ivh avglinux-7.1-24_free_rh_avi0720.i386.rpm
error: Failed dependencies:
        libexpat.so.0 is needed by avglinux-7.1-24_free_rh_avi0720.i386
        libstdc++-libc6.2-2.so.3 is needed by avglinux-7.1-24_free_rh_avi0720.i386
把少的package裝一裝吧 ^^
yum -y install compat-libstdc++-296
yum -y install compat-expat1


rpm -ivh avglinux-7.1-24_free_rh_avi0720.i386.rpm
Preparing...                ########################################### [100%]
   1:avglinux               ########################################### [100%]
AVG7 Anti-Virus command line scanner
Copyright (c) 2006 GRISOFT, s.r.o.
Program version 7.1.24, engine 718
Virus Database: Version 268.2.0/275  2006-03-06
License type is FREE.
Please launch the '/opt/grisoft/avggui/bin/avggui_update_licinfo.sh'
script as root for updating license information.

AVG 7.1 Anti-Virus Free for Linux successfully installed.

裝好了
更新病毒碼 (signatures)

#avgupdate
會出現usage 看了一下
要更新要加-o 即可

#avgupdate -o
這樣就可以更新病毒碼了
畫面就像下面一樣
Downloading file: avg7info.ctf         [   3659B]
Downloading file: u7avi1343u8.bin      [6280829B]
Downloading file: u7iavi1566u8.bin     [25841327B]
23% [u7iavi1566u8.bin 26% 6.44MB/24.64MB] 112.65KB/s 3m8s


裝裝好後會看到successfully的字眼  的畫面 如下.
Preparing to download files from 'http://www.grisoft.cz/softw/70/update/'.
Downloading file: avg7info.ctf         [   3659B]
Downloading file: u7avi1343u8.bin      [6280829B]
Downloading file: u7iavi1566u8.bin     [25841327B]
24% [u7iavi1566u8.bin 27% 6.67MB/24.64MB] 114.68KB/s 3m6sDownloading file: avg7info.ctf         [   3659B]
Downloading file: u7avi1343u8.bin      [6280829B]
Downloading file: u7iavi1566u8.bin     [25841327B]
23% [u7iavi1566u8.bin 26% 6.44MB/24.64MB] 112.65KB/s 3m8s
Downloading file: u7lx51fd.bin         [22838962B]
Updating...

Online update finished successfully.


命令列 scan file :以下scan /tmp的所有檔案為例
#avgscan /tmp/
AVG7 Anti-Virus command line scanner
Copyright (c) 2007 GRISOFT, s.r.o.
Program version 7.5.51, engine 442
Virus Database: Version 270.5.4/1567  2008-07-22
License type is FREE.
下面會年現scan的file


成功  ^^
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/20323203#comments http://yuanann.pixnet.net/blog/post/20242114 <![CDATA[便宜服務又好的搬家公司]]> 2008-07-21T09:23:06+08:00 挺不錯的,推薦給要搬家的人
最新資訊請 點我 點我

搬家公司服務簡介

新竹 --小楊-- 平價 自助搬家 網拍託運

「自助搬家」的定義﹕租車附司機不含苦力。
　　*** 需協助搬運請事前告知 ***

貨車規格﹕
　　1. 2.5噸得利卡貨車
　　2. 貨車承載空間﹕長290公分 X 寬170公分
　　3. 電動尾門升降機(方便搬運重物，如機車等)
　　4. 前座可多載2人、有冷氣(禁止抽煙、喝酒、嚼檳榔)
　　5. 顏色﹕商業藍(不可挑選顏色)
　　6. 小推車

收費方式﹕
　　計算方法﹕時間 + 距離（從搬運地算起至完成搬運止）
　　時間﹕1小時250元，不足1小時以1小時計。
　　距離﹕10公里以內200元，每增加1公里加收20元。
　　總價﹕每次出車最少450元(250元/小時 + 200元/10公里 = 450元)
　　*** 依實際情況收費，合理公道 ***

服務時間﹕
週一至週五﹕PM 19:00 ~ PM 24:00
週六、週日﹕AM 8:00 ~ PM 24:00

注意事項﹕
1. 請事前先將物品裝箱打包，以節省時間與金錢。
2. 請將路線事先規劃告知，以節省行車時間，增加行車安全。

　　~~~ 歡迎來信/電詢價 0982-035032 周小姐 ~~~
　　~~~ max.syy@gmail.com ~~~
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/20242114#comments http://yuanann.pixnet.net/blog/post/20240808 <![CDATA[Linux :找出某個程序的 pid 有那些]]> 2008-07-21T08:13:11+08:00 範例如下:我想知道mysql這個服務的pid 可以用以下指令
ps aux |grep mysqld
root      2052  0.0  0.0   4796  1252 ?        S    07:59   0:00 /bin/sh /usr/bin/mysqld_safe --datadir=/var/lib/mysql --socket=/var/lib/mysql/mysql.sock --log-error=/var/log/mysqld.log --pid-file=/var/run/mysqld/mysqld.pid
mysql     2114  0.0  0.8 136772 16988 ?        Sl   07:59   0:00 /usr/libexec/mysqld --basedir=/usr --datadir=/var/lib/mysql --user=mysql --pid-file=/var/run/mysqld/mysqld.pid --skip-external-locking --socket=/var/lib/mysql/mysql.sock
root      2954  0.0  0.0   4124   704 pts/1    R+   08:04   0:00 grep mysqld

也可以用pidof 這個指令來查詢pid
範例如下
pidof mysqld
2114

(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/20240808#comments http://yuanann.pixnet.net/blog/post/20061242 <![CDATA[Linux :split小技巧]]> 2008-07-16T23:59:02+08:00 split -b 50m file.tar.gz 
若要合併 可以用cat 指令把那些小檔案合併成一個大檔案 範例如下
  cat xaa xab xac xad xae xaf > file.tar.gz
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/20061242#comments http://yuanann.pixnet.net/blog/post/19944310 <![CDATA[不是要退出？ 謝長廷重砲轟馬 ]]> 2008-07-14T12:52:42+08:00 對於這樣的行為感到不屑
在看到的新聞畫面是謝長廷先生,用嚴肅的表情對國人宣布,要退出政壇,看起來一點也不像在說笑話的模樣
經過多少個月後,竞然用是幽默啦！ 這樣的話語說要重出政壇,真不知那來的勇氣可以說出這樣的話><
而畫面後方的支持者,是用什麼心態去支持這樣的政治人物? 真是另人不解 
這樣的畫面看在民進黨的支持者眼裡,不知是何滋味? (點我看畫面)

 
在7/14日 又看到這則新聞 
標題是"不服輸給馬這種ㄎㄚ ㄒㄧㄠ"

謝長廷生先,然道您的心理只有個人的輸贏嗎?
還是民進黨已經沒有人才了?
才會要你再複出政黨
這樣騙子以後說的話有誰要相信,
真是教壞小孩子



(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19944310#comments http://yuanann.pixnet.net/blog/post/19821767 <![CDATA[Perl:取得OS的訊息]]> 2008-07-11T11:01:26+08:00 看了一下資料.就寫了一個簡單的範例
安裝Sys::Info  請到這裡去下載
在寫範例時,在用到version這個function時,出現了下面訊息,看來是少了 Linux::Distribution 這個模組,在安裝後就可以正常執行這個範例了
看來這個模組還提供了相當多的function,可以讓perl 去取得OS的很多訊息. 是個不錯的模組
而這個模組我只有在Linux 上面執行, 在Window上面沒有跑過 ^^
Can't locate Linux/Distribution.pm in @INC (@INC contains: /usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.7/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.6/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.8 /usr/lib/perl5/site_perl/5.8.7 /usr/lib/perl5/site_perl/5.8.6 /usr/lib/perl5/site_perl/5.8.5 /usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.8/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.7/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.6/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.8 /usr/lib/perl5/vendor_perl/5.8.7 /usr/lib/perl5/vendor_perl/5.8.6 /usr/lib/perl5/vendor_perl/5.8.5 /usr/lib/perl5/vendor_perl /usr/lib/perl5/5.8.8/i386-linux-thread-multi /usr/lib/perl5/5.8.8 .) at /usr/lib/perl5/site_perl/5.8.8/Sys/Info/Driver/Linux/OS.pm line 216.

#!/bin/perl
use Sys::Info;
my $info = Sys::Info->new;
my $os   = $info->os(%options);
if ($os->is_windows)
{
        print "OS is window\n";
}
else
{
        print "os is unix or others OS" ;
}
$version=$os->version;
print "OS Version is:$version\n" ;
$name=$os->login_name;
print "Login name is :$name\n" ;
               
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19821767#comments http://yuanann.pixnet.net/blog/post/19821061 <![CDATA[Per::ActivePerl 模組安裝方法(PPM)]]> 2008-07-11T10:39:50+08:00 ppm在安裝好ActivePerl後ppm即安裝完成,ActivePerl的安裝請看這裡
啟動ppm 的方法很簡單在Dos模式下輸入ppm 再按Enter即可
畫面如下



在啟動時會有Synchronizing Database 的動作,
完成後就會看到上面的畫面了

安裝模組
在上面的畫面,可以看出ppm所提供所有的模組,使用者只要知道自己要的模組,右鍵點選後會出現Install 模組名租的畫面.
之後再點選以下的畫面打勾的地方即可,安裝好會結果會出現在status的地方



 


個人覺的ppm可取之處就是他有列出模組在cpan的網址,這對user而言,可以直按連過去看此模組的內容,還挺方便的
對每個模組的用法,在Abstract 的部份有簡單說明此模組的用法,也是很好的設計
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19821061#comments http://yuanann.pixnet.net/blog/post/19812654 <![CDATA[在Window開發與執行Perl 程式]]> 2008-07-11T01:10:48+08:00 我都是用他預設值,一直按下一步就安裝好了.這裡不多作說明
在安裝好之後,請進入Dos模式,可以用perl -v 來查看你安裝perl的版本
其它的都和在linux 上面執行perl 的方式相同
看一下我的perl版本畫面 上面有我安裝的版本5.8.8 ,有這個畫面表示Perl己安裝成功了,接下來就可以開始玩Perl囉 ~~
 This is perl, v5.8.8 built for MSWin32-x86-multi-thread
(with 18 registered patches, see perl -V for more detail)

Copyright 1987-2007, Larry Wall

Binary build 822 [280952] provided by ActiveState http://www.ActiveState.com
Built Jul 31 2007 19:34:48

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

ActivePerl的官方網頁在此,請自行下載想要裝的版本
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19812654#comments http://yuanann.pixnet.net/blog/post/19695741 <![CDATA[Perl:讀寫檔案的方法]]> 2008-07-08T18:36:22+08:00 本文簡單說明perl 對檔案的開啟和寫資料到檔案的方法
假設有一個檔案名為abc.txt,而abc.txt 的內容如下
line 1
line 2
line 3

讀檔的範例如下:這樣可以把abc.txt從第一行讀到最後一行
open(open_file,"abc.txt") or  "open file error" ;
while(<open_file>)
{
    chomp ;
    print "$_\n" ;
}

perl 對檔案的寫檔有二種方式,一種是建立新檔並寫入資料
範例如下
這樣abc.txt的內容就是:this is add data info,原本abc.txt的內容會被清掉,然後把$info的資料寫到檔案當中
open(write_file,">abc.txt") or  "open file error" ;
my $info="this is add data info" ;
print write_file "$info" ;


而複寫資料到檔案的檔案如下
執行完上面的程式之後,再執行下面的程式,abc.txt的內容就會有二行相同的資料
open(append_file,">>abc.txt") or  "open file error" ;
my $info="this is add data info" ;
print write_file "$info" ;

對檔案的處理,對於所建立的物件在不處理時,要有關掉的習慣
方法如下
close(object_name)
從上面的範例就是要close(write_file) 和close(append_file)
以上就是perl 處理檔案的方法


(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19695741#comments http://yuanann.pixnet.net/blog/post/19640750 <![CDATA[Perl:Net::Ping;簡介與範例]]> 2008-07-07T16:22:58+08:00 Net::Ping 可以在此下載

看完了上面的文章後,寫了這個sample來測試一下此model的功能
以下的範例只是測試了remote host 是否有反應 . $ip 請輸人你要測試的主機ip 這樣即可測試了

use Net::Ping ;
my $ip ="" ;
my $p = Net::Ping->new( "icmp", 1, 64 );
if ( $p->ping($ip) )
{
    print "$ip answered\n";
}
else
{
    print "$ip did not answer\n";
}
$p->close();
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19640750#comments http://yuanann.pixnet.net/blog/post/19087502 <![CDATA[Linux:Flash install and Demo]]> 2008-06-24T23:06:38+08:00 google一下這個package的安裝方法並記錄下來
下載
http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash&P2_Platform=Linux%20rpm%20-ivh%20flash-plugin-9.0.124.0-release.i386.rpm
請到上面的網站,找你相要安裝的檔案類別
以下用最簡單的方法rpm安裝
rpm -ivh file_name
安裝畫面如下

Preparing... ########################################### [100%]
1:flash-plugin ########################################### [100%]
這樣就安裝好了
可以看flash的網頁Demo一下
第一張是不能看到flash的網面
第二張就可以看到了.
圖一


圖二







(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/19087502#comments http://yuanann.pixnet.net/blog/post/18984328 <![CDATA[Linux:FTP Server (Vsftp)設定 ]]> 2008-06-21T23:06:25+08:00 我安裝在FC9的vsftp server 在install 好之後,第一次要登入時ftp server時出現了以下訊息
331 Please specify the password.
Password:
500 OOPS: cannot change directory:/home/xxxx
Login failed.

 發現要做下面的更動才能成功登入
請用root 更改 /etc/selinux/config 這個file
  把SELINUX更成下面的內容
SELINUX=disabled
更改之後要重新開機
而我記的FC8在安裝的過程會詢問SELINUX是否要Enable or Disable
但在FC9 是沒有詢問這個Option的

(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/18984328#comments http://yuanann.pixnet.net/blog/post/18909148 <![CDATA[Perl:Find::File簡介與範例]]> 2008-06-19T18:22:05+08:00 這個模組可以用來找特定目錄裡的檔案,簡單說明安裝和使用方法
下載 此模組在此下載

安裝
把此模組下載,解開之後看了一下README  裡面有安裝方法
安裝指令如下
#./Configure
#之後會進入安裝模式,有些問是要回答,我是狂按Enter就安裝好了
#make test
#make install
範例
#!/bin/perl
#This sample find the file name :abc in current directory, if find print Found info
use File::Find ;
$File::Find::name ="abc" ;
find (\&list,".") ;
sub list
{
        next if ($_ eq ".") ;
        if (-e $File::Find::name)
        {
                print "Found $File::Find::name\n";
        }
else
        {
                print "Didn't find $File::Find::name\n";
        }
}

(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/18909148#comments http://yuanann.pixnet.net/blog/post/18866318 <![CDATA[Linux :更改主機名稱的方法]]> 2008-06-18T11:57:29+08:00 上網找一下更改的方法,順使記錄起來,方法如下
vi /etc/sysconfig/network
第二行就是要改的host name

(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/18866318#comments http://yuanann.pixnet.net/blog/post/18552285 <![CDATA[Perl:SSH 安裝與簡範說明]]> 2008-06-09T19:57:31+08:00 首先要安裝Net::SSH::Perl這個模組, 用下面指令install
下載SSH模組請按此
#tar xvf Net-SSH-Perl-1.30.tar.gz
#cd Net-SSH-Perl-1.30
#perl Makefile.PL
之後會出現以下畫面
This is Net::SSH::Perl.

As of version 1.00, Net::SSH::Perl supports both the SSH1 and
SSH2 protocols natively. The two protocols have different
module prerequisitives, so you need to decide which protocol(s)
you plan to use. If you use one or the other, only those modules
for your chosen protocol will be installed; if you choose both,
all of the supporting modules will be installed. Please choose
the protocols you'd like to use from the following list ("Both"
is the default).

    [1] SSH1
    [2] SSH2
    [3] Both SSH1 and SSH2

Which protocol(s) do you plan to use? [3] 3

Some of the Net::SSH::Perl ciphers depend on a Crypt:: module from
CPAN. You may already have the necessary modules installed, in which
case you don't need to bother with this step. Otherwise you'll need
to install at least one cipher to use Net::SSH::Perl. Please choose
at least one from the following list (Crypt::IDEA is the default).





    [1] IDEA
    [2] DES
    [3] DES3
    [4] Blowfish
    [5] RC4

Enter your choices, separated by spaces: [1] 1

Checking for optional modules

Digest::BubbleBabble is required if you want to generate bubble babble
key fingerprints with pssh-keygen.

Would you like to install it? (y/n) [y]

Crypt::RSA is required if you wish to use the ssh-rsa public
key algorithm (ssh-dss is used by default).

Would you like to install it? (y/n) [y]

Checking if your kit is complete...
Looks good
Warning: prerequisite Convert::PEM 0.05 not found.
Warning: prerequisite Crypt::DH 0.01 not found.
Warning: prerequisite Crypt::DSA 0.11 not found.
Warning: prerequisite Crypt::IDEA 0 not found.
Warning: prerequisite Crypt::RSA 1.37 not found.
Warning: prerequisite Digest::BubbleBabble 0.01 not found.
Warning: prerequisite Digest::HMAC_MD5 0 not found.
Warning: prerequisite Digest::HMAC_SHA1 0 not found.
Warning: prerequisite Digest::SHA1 2.10 not found.
Warning: prerequisite Math::GMP 1.04 not found.
Warning: prerequisite Math::Pari 2.001804 not found.
Writing Makefile for Net::SSH::Perl

以上訊息表示上面的模組都要裝
可以用 cpan -i model_name 去處理
全裝好後再下
#perl Makefile.PL
#make
#make install
這樣就安裝好了


以下用簡單的sample來說明 ssh模組的用法
用codes來說明

use Net::SSH::Perl ;
my $ssh = Net::SSH::Perl->new("IP_address");
$ssh->login("username", "passord");
#要執行的指令寫在此即可
$ssh->cmd("touch abc.txt");
(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/18552285#comments http://yuanann.pixnet.net/blog/post/18364322 <![CDATA[Perl:Test模組簡介]]> 2008-06-04T12:55:17+08:00 #cpan -i Test
Test模組能處理的檔案屬性(attribute)請參考
http://www.cs.cf.ac.uk/Dave/PERL/node69.html
我寫一個測試用的script 來說明
#!/bin/perl
#檢查/tmp/abc.txt 是否為空檔
#執行前先要有要測試的檔案 ex:/tmp/abc.txt
use Test;
if ( -s "/tmp/abc.txt" )
{
    print " file size more then 0 \n";

}
else
{
    print "file size is 0\n";
}

 


(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/18364322#comments http://yuanann.pixnet.net/blog/post/18360623 <![CDATA[Perl:CPAN在linux上的安裝]]> 2008-06-04T09:39:28+08:00 請用yum 指令安裝cpan 指令如下
請用root執行以下指令
#yum -y install cpan
完成後會有以下訊息
Installed: perl-CPAN.i386 0:1.76_02-39.fc8
Complete!

第一次啟動cpan
#capn
We have to reconfigure CPAN.pm due to following uninitialized parameters:

cpan_home, keep_source_where, build_dir, build_cache, scan_cache, index_expire, gzip, tar, unzip, make, pager, makepl_arg, make_arg, make_install_arg, urllist, inhibit_startup_message, ftp_proxy, http_proxy, no_proxy, prerequisites_policy, cache_metadata

/usr/lib/perl5/5.8.8/CPAN/Config.pm initialized.
再來會進入互動模式
都是簡單的英文,這裡就不說明了
最後出現以下訊息表示設定成功囉
commit: wrote /usr/lib/perl5/5.8.8/CPAN/Config.pm
Terminal does not support AddHistory.

cpan shell -- CPAN exploration and modules installation (v1.7602)
ReadLine support available (try 'install Bundle::CPAN')
這會進入CPAN的shell ,這裡可以安裝你想要的模組
cpan>

(繼續閱讀...)
]]> http://yuanann.pixnet.net/blog/post/18360623#comments