Here is the Perl Script which is causing the error:
#!/usr/bin/perl
# Stephen McGowan
use strict;
use warnings;
use Bio::SeqIO;
use Data::Dumper;
use DBI;
use mysql;
# The point of this script is to grab some useful identifiers from a SwissProt .dat file, and pass
# them to a MySQL database with the BioSQL schema.
# These identifiers are UniProt name, Uniprot accession number, InterPro accession number, InterPro
+ domain type.
# The standard script load_seqdatabase.pl does not fetch the InterPro domain name.
# connect to file and create object
my $file = 'load_seqdb_test_dat.txt';
my $DEBUG = 0;
my $inseq = Bio::SeqIO->new(-file => "<$file", -format => "swiss");
my @parsed_entries = (); # storage for fields of interest
# connect to mysql db, localhost
my $dbh = DBI->connect( "dbi:mysql:biosql:localhost:3306", 'root', 'root') or die "Could not connec
+t.";
I'm not sure why it is generating the error message:
Can't locate mysql.pm in @INC (@INC contains: /Library/Perl/Updates/5.8.8/darwin-thread-multi-2leve
+l /Library/Perl/Updates/5.8.8 /System/Library/Perl/5.8.8/darwin-thread-multi-2level /System/Librar
+y/Perl/5.8.8 /Library/Perl/5.8.8/darwin-thread-multi-2level /Library/Perl/5.8.8 /Library/Perl /Net
+work/Library/Perl/5.8.8/darwin-thread-multi-2level /Network/Library/Perl/5.8.8 /Network/Library/Pe
+rl /System/Library/Perl/Extras/5.8.8/darwin-thread-multi-2level /System/Library/Perl/Extras/5.8.8
+/Library/Perl/5.8.6 /Library/Perl/5.8.1 .) at stub_uniprot_interpro.pl line 11.
BEGIN failed--compilation aborted at stub_uniprot_interpro.pl line 11.
|
