for my $grapheme ($csv_stream =~ m/(\X)/g) {
    ...
}