[問題] Can't locate Msql.pm in @INC ......

看板FreeBSD作者時間6年前 (2018/05/16 16:26), 6年前編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/2 (看更多)
各位先進大家好 因為系統轉換 新主機 作業系統9.3 改成 11.1 前人有製作了一個安裝包 安裝包 裡面一些pkg檔 與 /etc設定檔案 將安裝包下載到 已經安裝好 9.3 的環境 執行 install.sh 就能把 主機裝好 安裝的套件 除了安裝包內的 pkg檔 還有利用ports安裝一些套件 但同樣的安裝包 在11.1的主機 就沒有辦法安裝成功 要判定 在9.3上面有安裝成功 則是在 sh 跑完後 執行 perl test.pl 檔 執行的結果會在文字模式 列出一個小表格 11.1 執行 perl test.pl 則是 出現如下錯誤 Can't locate Mysql.pm in @INC (you may need to install the Mysql module) (@INC contains: /usr/local/lib/perl5/site_perl/mach/5.24 /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/5.24/mach /usr/local/lib/perl5/5.24 .) at test.pl line 2. BEGIN failed--compilation aborted at test.pl line 2. 一開始 我猜想 或許是 作業系統太舊 而 pkg 太舊 也下載了 或是 ports裝 比較適於11.1的pkg 但錯誤依舊 還蠻傷腦筋的 --------------附上 test.pl 內容--------------- #!/usr/bin/perl use Mysql; $dbh=Mysql->connect("localhost","mysql","root","XXXX"); $q_str="show databases"; $row=$dbh->query($q_str); while(($db)=$row->fetchrow) { $q_str = "show tables from $db"; $row1=$dbh->query($q_str); while(($tbl)=$row1->fetchrow) { $q_str="alter table $db.$tbl type=MyISAM;"; print "$q_str\n"; } } 再請諸位先進前輩 多多指點 感謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 122.116.172.8 ※ 文章網址: https://www.ptt.cc/bbs/FreeBSD/M.1526459189.A.665.html ※ 編輯: TPPCMAN (122.116.172.8), 05/16/2018 16:29:33
文章代碼(AID): #1Q--irPb (FreeBSD)
文章代碼(AID): #1Q--irPb (FreeBSD)