Select Code to Download

my $rv = sth->bind_columns(\(undef,$uname,$fname,$fgroup,$dmod,$accts)
+ );

    ## from perlref
    @list = (\$a, \@b, \%c);
    @list = \($a, @b, %c);    # same thing!