Select Code to Download

my $found;
while (@row = $query->fetchrow_array) {
...
} else {
  # data was not found
}

my $sql = "SELECT * FROM $course WHERE column = ?";
my $sth = $dbh->prepare($sql);
...
} else {
  # no such row found
}