Code:
#!/usr/bin/perl

use strict;
use warnings;

use LWP::Simple;
use DBI;

my $symbol = uc($ARGV[0]);
my $host = "localhost";
my $database = "stockanalysis";
my $hostname = "localhost";
my $port = 3306;
my $dbuser = "root";
my $dbpass = "pass";
my $stocktable = "stock";
my $stockdatatable = "stockdata";

sub doesStockExist
{
	my $symbol = shift;
	my $dsn = "DBI:mysql:database=$database;host=$hostname;port=$port";
	my $dbh = DBI->connect($dsn, $dbuser, $dbpass);
	my $drh = DBI->install_driver("mysql");

	my $execute;
	my $numrows;
	my $results;


	my $sth = $dbh->prepare("SELECT * FROM $stocktable WHERE symbol = '$symbol'");
	$sth->execute();
	$numrows = $sth->rows();

	print "numrows: $numrows\n";
	return 1;
}


Error:

install_driver(mysql) failed: Can't locate DBD/mysql.pm in @INC (@INC contains: /sw64/lib/perl5/darwin-thread-multi-2level /sw64/lib/perl5 /sw64/lib/perl5/darwin /Library/Perl/Updates/5.8.9 /System/Library/Perl/5.8.9/darwin-thread-multi-2level /System/Library/Perl/5.8.9 /Library/Perl/5.8.9/darwin-thread-multi-2level /Library/Perl/5.8.9 /Network/Library/Perl/5.8.9/darwin-thread-multi-2level /Network/Library/Perl/5.8.9 /Network/Library/Perl /System/Library/Perl/Extras/5.8.9/darwin-thread-multi-2level /System/Library/Perl/Extras/5.8.9 /Library/Perl/5.8.8 /Library/Perl/5.8.6 /Library/Perl/5.8.1 .) at (eval 4) line 3.
Perhaps the DBD::mysql perl module hasn't been fully installed,
or perhaps the capitalisation of 'mysql' isn't right.
Available drivers: DBM, ExampleP, File, Gofer, Proxy, SQLite, Sponge.
 at ./grabstock line 23