Select Code to Download

my @ref = ();
$username = $mem_info[2];
...
  push @ref, join '|',@names if (scalar(@names));
  last if $#ref == 2 ;
}

my $base_sql=q{SELECT username,status FROM members WHERE