if ($1) {
        say "\t Next 10 char after the match: $1";
        $hash{$1}++;
    next;
    }