perl½«oracleÊý¾Ý¿âµÄÊý¾Ýµ¼³ö³ÉtxtµÄ¼òµ¥·½Ê½
µ±ÎÒÃÇÃæ¶Ô Êý°ÙÍòÊýǧÍòÐÐÁеÄÊý¾Ý¿â±íµÄʱºò£¬¶øÄãÓÖÏ£ÍûÄܽ«Êý¾Ý¾¡¿ìµÄµ¼³ö³Étxt¸øÄãµÄÀϰ壬ÓÐÈí¼þ»òÕ߯äËû¶«Î÷µ¼³öÀ´¾ÍÏԵñȽÏÓôÃÆÁË£¬ÒòΪÀϰåÒª³ÔÎç·¹ÁË£¬Ëû¿É²»Ï£ÍûÔÚϰàµÄʱºò»¹Ìýµ½ÄãÔÚ˵£¬Êý¾ÝÕýÔÚµ¼³öÖС£
ÓÚÊÇÎÒÃÇÀûÓÃÁË£¬ËÙ¶ÈתÈëÕýÌâÁ˰¡¡£
ÐèÒªµÄÄ£¿é£º
DBI£»
#!/usr/bin/perl
use DBI;
$dbname="Êý¾Ý¿â·þÎñÃû³Æ";
$user="Óû§";
$passwd="ÃÜÂë";
open IN,">Ä¿µÄÎļþ.txt"or die "$!";
my $dbh = DBI->connect("dbi:Oracle:$dbname",$user,$passwd) or die "can't connect to
database ". DBI-errstr;
my $sth = $dbh->prepare("select * from wl_cp_name"); #ÓÃsqlÓï¾äд³öÄãÏëÒªµÄÊý¾Ý
$sth->execute();
while (my @ref = $sth->fetchrow_array()){
chomp (@ref);
my $file_data = join "\t", @ref; #ÒÔÖÆ±í·ûÀ´·Ö¸î×îºóµ¼³öÀ´µÄÊý¾Ý
print IN $file_data."\n" #µ¼ÈëÄ¿µÄÎļþ
}
print "ÒѾÅÜÍêÁË\n";
$sth->finish();
$dbh->disconnect();
close IN;
OKÁË£¬³ÌÐò¾ÍÊÇÕâô¼òµ¥£¬¸øÁËÒ»¸ö½Ó¿ÚÒÔºó£¬perl¾Í¿ÉÒÔ¾¡ÇéµÄץȡÊý¾ÝÁË£¬·ÅÐİɣ¬ÄãµÄÀϰ廹ûÀ´µÄ¼°°ÑµÊ×Ó×øÈȺõ£¬Äã¾Í¿ÉÒÔ°ÑÊý¾Ý¸øËûÁË£¬ÈÃËû¾Í¶Ô¸¶ÕâÖØÁ¿¼¶µÄÊý¾Ý°É¡£ºÇ
Ïà¹ØÎĵµ£º
¿Î³Ì¾Å ÉùÃ÷±äÁ¿
¡¡¡¡
¡¡¡¡±¾¿ÎÖØµã£º
¡¡¡¡1¡¢Á˽â»ù±¾µÄPLSQL¿éºÍÇøÓò
¡¡¡¡2¡¢ÃèÊö±äÁ¿ÔÚPLSQLÖеÄÖØÒªÐÔ
¡¡¡¡3¡¢Çø±ðPLSQLÓë·ÇPLSQL±äÁ¿
¡¡¡¡4¡¢ÉùÃ÷±äÁ¿
¡¡¡¡5¡¢Ö´ÐÐPLSQL¿é
¡¡¡¡
¡¡¡¡×¢Ò⣺ÒÔÏÂʵÀýÖбêµã¾ùΪӢÎİë½Ç
¡¡¡¡
¡¡¡¡Ò»¡¢¸ÅÊö£º
¡¡¡¡1¡¢PLSQL ¿é½á¹¹£º
¡¡¡¡DECLARE --- ¿ÉÑ¡
¡¡¡¡±äÁ¿Éù ......
¿Î³ÌÊ®Èý ʹÓÃ×éºÏÊý¾ÝÀàÐÍ* Óαê²Ù×ÝÊý¾Ý
¡¡¡¡
¡¡¡¡±¾¿ÎÖØµã£º
¡¡¡¡1¡¢´´½¨Óû§×Ô¶¨ÒåµÄPLSQL¼Ç¼
¡¡¡¡2¡¢ÀûÓÃ%ROWTYPEÊôÐÔÀ´´´½¨¼Ç¼
¡¡¡¡3¡¢´´½¨PLSQL±í
¡¡¡¡4¡¢ÃèÊö¼Ç¼¡¢±í¡¢¼Ç¼µÄ±íÖ®¼äµÄÇø±ð
¡¡¡¡×¢Ò⣺ÒÔÏÂʵÀýÖбêµã¾ùΪӢÎİë½Ç
¡¡¡¡Ò»¡¢ºÏ³ÉÊý¾ÝÀàÐÍ
¡¡¡¡1¡¢ÀàÐÍ·ÖΪPLSQL¼Ç¼ºÍPLSQL±í
¡¡¡¡2¡ ......
×÷Õß Haidong Ji ·Òë GoodKid
ÎÒÃǵ±ÖеĴ󲿷ÖÈ˹¤×÷ÔÚÒ»¸öµ¥Ò»µÄ RDBMS ϵͳÖУ¬Èç MSSQL, Oracle, or IBM DB2¡£È»¶ø£¬ÎÒÃÇÈÕÒæ¸Ð¾õµ½£¬ÎÒÃÇÕý´¦ÓÚ²»Í¬µÄÊý¾Ý¿â»·¾³µ±Öв¢ÇÒÐèÒª½â¾öÊý¾ÝµÄ»¥ÓÃÐÔÎÊÌâ¡£
¾¡¹ÜÖ÷ÒªµÄ RDBMS ³§ÉÌÊÔͼȥ×ñѹØÏµÊý¾Ý¿âÄ£ÐÍÔÀí£¬²¢ÇÒÓ÷dz£Ð¡µÄ²îÒìȥʵÏÖËüÃÇ¡£ÁíÍ⣬¼¸ºõÖ÷ÒªµÄ ......
SID_LIST_LISTENER =
(SID_LIST =
(SID_DESC =
(SID_NAME = PLSExtProc)
(ORACLE_HOME = D:\oracle\product\10.2.0\db_1)
(PROGRAM = extproc)
)(SID_DESC =
&nb ......
Username
Password
Description
See Also
CTXSYS
CTXSYS
The Oracle Text account
Oracle Text Reference
DBSNMP
DBSNMP
The account used by the Management Agent component of Oracle Enterprise Manager to&nb ......