while ( @array_c = $sth->fetchrow()){

$TOALL = &cleaner ($pointer->{'ACCOUNT#'});

push @array_c,$TOALL; # Array that has all account numbers 

}
print "<br><font color=red><b> $array_c </b></font>";