Select Code to Download

use strict;
$sth->bind_columns( undef, \$uname, \$fname, \$fgroup, \$dmod, \$accts
+ );

  my ($uname,$fname,$fgroup,$dmod,$accts);