Select Code to Download

my @user_id = 
  CompanyDB::Query('USER_ID_FROM_USERNAME', $cgi->param('username'));

use EZDBI;
for my $row (Select('* from users')) {
...

use DBIx::Abstract;
$dbh->select('* from users');