sub show_news {
  my ($dbh, $article_id) = @_;
  my $sth = $dbh->prepare("...");
  $sth->execute($article_id);
}