SA Bugzilla – Attachment #1322: suggested patch for bug #2390
$count = 0;
# wrap in eval so it doesn't run in general use. This accesses db
# modules directly.
eval '
# Note: (bug 2390), the 'use' needs to be on the same line as the eval
use ' . $dbm . ';
# for RPM dependency checks to work properly. It's lame, but...
eval 'use ' . $dbm . ';
tie %in, "' . $dbm . '", $filename, O_RDONLY, 0600;
%{ $output } = %in;
$count = scalar keys %{ $output };