Select Code to Download

my $sql = 'SELEcT Email FROM foo';
my $sth = $dbh->prepare($sql);
...
    }
$sth->finish();
$dbh->disconnect();

my $sql = 'SELECT Email FROM foo';
my $sth = $dbh->prepare($sql);
...
else {
    print "Database empty\n";
    }