while (my $row = $sth->fetch()) {
        my ($parent_id, @children_ids) = @$row;
        for my $id (grep defined, @children_ids) {
            ...
        }
    }