Yapaysql artificialsql, veritabanı destek modülü ile yapay bir kimya.
Şimdi İndirin

Yapaysql Sıralama ve Özet

Yapaysql Etiketler

Sql Perl modülü yapay Kimya yapay kimya yapay SQL

Yapaysql Açıklama

Artificialsql, veritabanı destek modülü ile yapay bir kimya. Artificialsql, veritabanı destek modülü ile yapay bir kimya. KULLANIM KİMYASI :: SQL; Kullanım Kimyası :: Yapay :: SQL; # Yürütme: perl gcha.pl dbname chaname beden_value seviye # number_of_components_to_process benim $ dbname = $ argv ; $ chaname = $ argv ; $ bedenim = $ argv ; $ seviyelerim = $ argv ; $ CompNumber = $ argv ; eğer (skaler (@argv)! = 5) {"Yanlış parametre numarası n"; baskı "perl gcha.pl dbname chaname beden_value seviyeleri number_of_components_to_process n"; çıkış; } Benim $ DB1 = Kimya :: SQL-> YENİ (DB_HOST => "127.0.0.1", DB_USER => "root", db_port => "3306", db_pwd => "", db_name => "$ dbname", db_driver => "mysql"); $ db1-> connect_db; $ cha = kimya :: yapay :: SQL-> Yeni (DB_NAME => $ DB1); $ Cha-> New_Ch ("$ chaname", "Test Açıklaması"); #Inserting reaksiyonları # Bu örnek dosyayı C = CC = C.C = C >> C1 = CCCCC1 ile çalışıyoruz. $ String_react = $ db1-> string_react (1); $ qr = $ cha-> create_reaction ($ string_react, 'smiles'); $ cha-> art_insert_react ($ qr, "$ chaname"); $ string_react = $ db1-> string_react (2); $ qr = $ cha-> create_reaction ($ string_react, 'smiles'); $ cha-> art_insert_react ($ qr, "$ chaname"); # Bileşenleri ekleme $ listem = $ dB1-> rover_comp ("", ""); $ bileşenim; $ formülüm; $ smilesformum; için ($ index = 0; $ indexprint (format => 'gülümsemeler', benzersiz => 1); $ cha-> art_insert_comp (@ $ liste , "$ chaname");} baskı ("$ üreten $ $ dbname veri tabanında CHANAME "); $ cha-> ch_artificial_table ($ düzey," $ chaname ", $ boyutu); Gereksinimler: · Perl Gereksinimleri: · Perl

Yapaysql İlgili Yazılım