use strict; use Data::Dumper; use Carp; use DBI; my $dsn = 'localhost'; my $user = 'monkfan'; my $password = 'monkfan'; my $dbh = DBI->connect('dbi:mysql:motif_finder','monkfan','monkpwd') or die "Connection Error: $DBI::errstr\n"; my $sql = "SELECT Symbol FROM gene2go WHERE GeneID=812222"; my $sth = $dbh->prepare($sql); $sth->execute or die "SQL Error: $DBI::errstr\n"; while ( my @row = $sth->fetchrow_array ) { print "@row\n"; } #### :!perl test_dbi.pl DBD::mysql::st execute failed: Unknown column 'Symbol' in 'field list' at test_dbi.pl line 21. SQL Error: Unknown column 'Symbol' in 'field list' #### mysql> select Symbol from gene_info where GeneID = "812222"; +-----------+ | Symbol | +-----------+ | PF14_0640 | +-----------+ 1 row in set (13.06 sec) mysql> show tables; +------------------------+ | Tables_in_motif_finder | +------------------------+ | gene2go | | gene_info | +------------------------+ 2 rows in set (0.00 sec) mysql> show databases; +--------------+ | Database | +--------------+ | motif_finder | +--------------+ 1 rows in set (0.00 sec)