#sql code here...
while (my $pointer = $sth->fetchrow_hashref){

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

push @array_claim,$TOALLCLAIM; # Array that has all account numbers

}