use strict; my ($sth, $_mad); $sth = $dbh->prepare(qq{SELECT * FROM `merchantAccounts` WHERE `u` = "1" AND (`volume_capable` < (`current_volume` + $_GrandTotal))}); $sth->execute(); $_mad = $sth->fetchrow_hashref(); $sth->finish(); my $_madFile = $_mad->{name}; use MA::$_madFile;