Perl ve DBI: MySQL ile ilk komut

Bu yazıda Perl ile mysql db nasıl birlikte anlamaya çalışacağız.
Bu hemen bu görev için Perl DBI sürücü (Veritabanı Arayüzü), ya da veritabanına arayüz liguaggio sağlayan bir kütüphane ihtiyacı öncesinde gerekir.
Sadece bu değil, biz de db MySQL YDB modül arabirimi veya iletişim gerekir.
Peranto önce bizim sunucu, DBI ve DBD kontrol edilmelidir.
Her iki sürücü de varsa biz devam edebilirsiniz. Sizden önce Aksi takdirde, her iki yüklemeniz gerekir.

İşte MySQL db veri girmek için scriptin (tam) bu sürücüleri kullanan küçük bir perl olduğunu.
Kodu:

 #! / Usr / bin / perl-w

 


 



 DBI kullanın;

 

 



 # Mysql db veri erişim

 






 $ Database = "dbname";







 $ User = "root";







 $ Geçiş = "gizli";







 $ Driver = "DBI: mysql";

 

 



 # Db bağlanma

 






 benim $ dbh = "DBI -> bağlantı ($ sürücüsü: database = $ database, $ kullanıcı, $ pass)

 






 ya da "bağlanılamıyor!" die

 

 



 # Veritabanına bazı veri ekleme

 






 $ Dbh-> do (Tablo INTO "INSERT (Alan1, Alan2) VALUES ('foo', 'bar')");

 

 



 # Db bağlantısını kesme

 






 $ Dbh-> kesmek;

 

 



 exit;