ArtificialSQL

ArtificialSQL is an artificial chemistry with database support module.
Download

ArtificialSQL Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Bernat Requesens
  • Publisher web site:
  • http://search.cpan.org/~brequesen/Chemistry-Artificial-SQL-0.01/lib/Chemistry/Artificial/SQL.pm

ArtificialSQL Tags


ArtificialSQL Description

ArtificialSQL is an artificial chemistry with database support module. ArtificialSQL is an artificial chemistry with database support module.SYNOPSIS use strict; use Chemistry::SQL; use Chemistry::Artificial::SQL; # Execution: perl gcha.pl DBNAME CHANAME SIZE_VALUE LEVELS # NUMBER_OF_COMPONENTS_TO_PROCESS my $dbname = $ARGV; my $chaname = $ARGV; my $size = $ARGV; my $levels = $ARGV; my $compnumber = $ARGV; if (scalar(@ARGV)!=5) { print "Incorrect parameter number n"; print "perl gcha.pl DBNAME CHANAME SIZE_VALUE LEVELS NUMBER_OF_COMPONENTS_TO_PROCESS n"; exit; } my $db1 = Chemistry::SQL->new(db_host=>"127.0.0.1",db_user=>"root",db_port=>"3306",db_pwd=>"", db_name=>"$dbname",db_driver=>"mysql"); $db1->connect_db; my $cha = Chemistry::Artificial::SQL->new(db_name=>$db1); $cha->new_ch ("$chaname","TEST DESCRIPTION"); #Inserting Reactions #In this example file we're working with the reaction C=CC=C.C=C>>C1=CCCCC1 my $string_react = $db1->string_react(1); my $qr=$cha->create_reaction($string_react,'smiles'); $cha->art_insert_react($qr,"$chaname"); my $string_react = $db1->string_react(2); my $qr=$cha->create_reaction($string_react,'smiles'); $cha->art_insert_react($qr,"$chaname"); # Inserting Components my $list = $db1->recover_comp("",""); my $component; my $formula; my $smilesform; for (my $index=0; $indexprint(format => 'smiles', unique => 1); $cha->art_insert_comp(@$list,"$chaname"); } print ("GENERATING $chaname IN $dbname DATABASEn"); $cha->ch_artificial_table($levels,"$chaname",$size);Requirements:· Perl Requirements: · Perl


ArtificialSQL Related Software