ºìÁªLinuxÃÅ»§
Linux°ïÖú

ÊÜÏÞÖÆ»·¾³°²×°PerlÄ£¿é·½·¨

·¢²¼Ê±¼ä:2006-05-10 01:03:51À´Ô´:ºìÁª×÷Õß:linux
¼ò½é£º
ÕâƪÎÄÕ¾ßÌå½²ÊöÁË£¬¹ØÓÚÈçºÎÔÚÊÜÏÞÖƵÄϵͳ»·¾³ÖУ¬°²×°¿çƽ̨ÓëÒÀÀµÆ½Ì¨µÄÄ£¿é¡£ÕâÑù¼´Ê¹ÄãµÄ·þÎñÆ÷²»Ö§³ÖDBD::mysql£¬ÄãÒ²¿ÉÒÔÔÚÍøÕ¾ÖÐÁ¬½ÓMySQLÁË£¬µ±È»±Ø±¸µÄÒ»¸öÌõ¼þ±ØÐëÊÇ¿ÉÒÔͨ¹ýFTPÀ´ÉÏ´«Îļþ¡£ nbsp;
Èç¹ûÄãµÄÖ÷»ú·þÎñÉÌÖ»ÌṩFTPȨÏÞ¸øÄ㣬¶øÇ¡ÇÉÄãµÄÀÏ°åÈ´ÈÃÄãÔËÐÐÒ»¸ö´øÓÐMySQLÊý¾Ý¿â²Ù×÷µÄ³ÌÐò£¬ÄÇôÈç¹ûÕâʱÎÒÃÇÖ»Ïë¸ø·þÎñÆ÷ÉϵÄij¸ö³ÌÐò¼ÓÉÏһЩģ¿é£¬¶øÓÖ²»´òËãÐÞ¸Äϵͳ½á¹¹µÄ»°£¬ÕâʱµÄ×´¿öÎÞÒÉÌýÆðÀ´ÏóÊÇÃæÁÙÊ®·ÖÑÏÖصĶòÔË£¬ËùÒÔ£¬ÎÒÃÇÒ²Ö»ºÃʹÓÃһЩÁíÀàµÄ·½·¨À´½â¾öÎÊÌâ¡£

ÏëÏóһϣ¬ÎÒÃÇÔÚ½øÐÐÄ£¿é°²×°Ê±,·³ËöµÄ¹ý³ÌÖ»ÊǽøÐбàÒë¶þ½øÖÆ´úÂ루ÊʺÏÕâ¸ö»úÆ÷ÔËÐеģ©ºÍһЩ´¿PerlµÄÄ£¿éµÄ¼òµ¥¹¤×÷¡£ÄÇôÕâʱֻҪÎÒÃÇÄÜ°ÑÏàͬ»·¾³µÄÕâЩģ¿é£¬¸´ÖƵ½ÄãµÄÄ¿±êϵͳ¾Í¿ÉÒÔÍê³ÉÄ£¿éµÄ°²×°¡£µ±È»£¬ÕâÊÇÐèҪһЩ¹ý³ÌµÄ¡£

ÒÔϵݲװ·½·¨ÔÚVMWAREϵÄRedhat9ÖвâÊÔͨ¹ý£¬ÏµÍ³ÖÐûÓÐDBD¡¢DBI¡¢Mysqlclient¿â£¬°²×°µÄʱºòֻʹÓÃÁËÆÕͨÓû§Éí·Ý¡£

Ê×ÏÈÄãҪ׼±¸Ò»¸öÒѾ­°²×°ÕâЩģ¿éµÄ¶ÔÕÕ»ú£¬²¢ÇÒͬÄãµÄÄ¿±ê»ú²Ù×÷ϵͳ¼æÈÝ¡£ nbsp;
ÔÙ´ÎÄãÒªÓÐÒ»ÖÖ·½Ê½¿ÉÒÔ½«Ò»Ð©Îļþ¸´ÖƵ½ÄãµÄÄ¿±êϵͳÖУ¬²¢ÇÒ¿ÉÒÔÔËÐÐPerl³ÌÐò×ö²âÊÔ¡£ nbsp;
°²×°DBIÄ£¿é nbsp;
ÔÚÄ¿±êϵͳÖÐдһ¸ö²âÊÔ´úÂë¡£ nbsp;
#!/usr/bin/perl

use nbsp;DBI;

print nbsp;"Hello nbsp;World!";

* nbsp;ÔËÐÐÕâ¸ö´úÂ룬Ä㽫ºÜÈÙÐҵĵõ½´íÎó¡£

Can't nbsp;locate nbsp;DBI.pm nbsp;in nbsp;@INC nbsp;(@INC nbsp;contains
.........
BEGIN nbsp;failed--compilation nbsp;aborted nbsp;at.....

ÐÞ¸ÄÕâ¸ö´úÂ룬ÈÃËû½øÐвéÕÒModulesµÄ¿â¶àÒ»¸ö±¾µØ·¾¶¡£ nbsp;
#!/usr/bin/perl

use nbsp;FindBin nbsp;qw($Bin);
use nbsp;lib nbsp;"$Bin";
use nbsp;DBI;

print nbsp;"Hello nbsp;World!";

²é¿´¶ÔÕÕ»ú´æ·ÅÄ£¿éµÄĿ¼һ°ãÊÇ/usr/lib/perl5/xxx/site_perl»òc:perlsite_perlÄã»á·¢ÏÖÀïÃæÓÐÒ»¸ö DBI.pm nbsp;°ÑÕâ¸öÎļþÖ±½Ó¸´ÖƵ½ÄãÕą̂»úÆ÷ÉÏ£¬»¹ÓÐÒ»¸ö½ÐDBIµÄĿ¼£¬ÄãÒ²ÍêÈ«¸øËü¸´ÖƵ½Õâ¸öÄ¿±ê»úÉÏ£¬ÔÙÔËÐиղŵijÌÐò£¬Äã»áµÃµ½ÕâÑùµÄ½á¹û¡£ nbsp;
Can't nbsp;locate nbsp;loadable nbsp;object nbsp;for nbsp;module nbsp;DBI nbsp;in nbsp;@INC nbsp;(@INC nbsp;contains..
......
BEGIN nbsp;failed--compilation.......

²é¿´¶ÔÕÕ»úµÄautoĿ¼£¬ÀïÃæÒ²ÓÐÒ»¸öDBIĿ¼¡£Äã²Â¶ÔÁË£¬ÄãÒªÔÚÄ¿±ê»úÉÏÕÕÑù×Ó½¨Ò»¸öautoĿ¼£¬ÔÙÕÕÑù×Ó½¨Ò»¸öDBI°Ñ¶«Î÷¸´ÖƹýÀ´¡£Çë×¢ÒâÔÚlinuxϵͳÏÂÊÇÓдóСдÇø±ðµÄ¡£

ÔÙ´ÎÔËÐиղŵijÌÐò£¬ÄãÓ¦¸Ã³É¹¦ÁË¡£ nbsp;
Hello nbsp;World!

°²×°DBD::mysql

ÏÈ°Ñ´úÂë×öÒ»´ÎÐ޸ġ£ nbsp;
#!/usr/bin/perl

use nbsp;FindBin nbsp;qw($Bin);
use nbsp;lib nbsp;"$Bin";
use nbsp;DBI;
$dbh=DBI->connect("DBD:mysql:database=test");
$sth=$dbh->prepare("select nbsp;version()");
$sth->execute();
$row=$sth->fetchrow_arrayref();
print nbsp;$row->[0];

¸ú°²×°DBIµÄģʽ»ù±¾Ïàͬ,¸´ÖƶÔÕÕ»úDBDĿ¼ÖеÄmysql.pmºÍmysql×ÓĿ¼µ½Ä¿±ê»úµÄͬÑùĿ¼¡£

ÔÙ¸´ÖÆautoÏÂdbdĿ¼ÖеÄmysql.pmºÍmysqlĿ¼µ½¶ÔÕÕ»úÉÏ¡£

ÔËÐиղÅÐ޸ĺõijÌÐò£¬Ò»ÇÐÍê³É¡£ nbsp;
»¹²»ÐÐÔõô°ì

×îÈÝÒ׳öÏÖµÄÎÊÌâÊÇÄã°ÑĿ¼¸ã´íÁË¡£Çë×Ðϸ²é¿´ÄãĿ¼ÊÇ·ñ´íÁË¡£±ÈÈçÒªÓÐ/auto/dbd/mysqlÄãÊDz»Êǽ¨³É/auto/dbd/dbd/mysqlÁË?

Ϊʲô»áÕâÑù

Èí¼þ°²×°²»Íâºô±àÒë°²×°¡¢¸´Öƶþ½øÖÆÂëÁ½ÖÖ¡£¶øÎÒÃÇÕâÖÖ¿ÉÒÔ³ÆΪÊÖ¹¤¸´Öƶþ½øÖÆÂë¡£Ö»ÒªÄãÉèÖúÃFindBinºóÔÙϸÐĵĽ«Ò»Ð©±ØÒªµÄÄ£¿é¸´ÖƹýÀ´¾Í»ù±¾¶¼¿ÉÒÔÔËÐС£µ«ÊÇÈç¹ûÕâ¸öÄ£¿é»¹ÒÀÀµÆäËûµÄ¿â±ÈÈçImageMagick¿â£¬ÄÇôÄã¾ÍÒªÏë°ì·¨°ÑÄǸö¿âÒ²¸ãµ½Õą̂»úÆ÷ÉÏÀ´ÁË¡£

»ù±¾°²×°¹æÔò

Äã±ØÐëÈýâÎöÆ÷ÖªµÀÄãµÄÄ£¿éÔÚÄÇÀïÕâ¸öÒÀÀµFindBin½¨Òé°ÑFindBinºÍuse nbsp;lib¶¼·ÅÔÚ×îÏȵļ¸ÐС£ nbsp;
°ÑÏëҪʵÏÖ¹¦ÄܵÄÄ£¿é°´ÕÕÔ­À´µÄ½á¹¹¸´ÖƵ½ÄãµÄÄ¿±ê·þÎñÆ÷ÖС£ nbsp;
±£Ö¤¶ÔÕÕ»úºÍÄ¿±ê»úµÄϵͳÊǼæÈݵģ¬·ñÔò¶þ½øÖƵÄÄ£¿é½«³ö´í¡£ nbsp;
´Ë·½·¨£¬ÓÉPerlchinaµÄ»áԱɵ¹Ï²âÊÔÔÚwindowsÏÂͨ¹ý¡£
ÎÄÕÂÆÀÂÛ

¹²ÓÐ 0 ÌõÆÀÂÛ