Text::...eGuess(3pm)

✨ NAME ✨

Text::CSV::Encoded::Coder::EncodeGuess — it's a Text::CSV::Encoded coder class that uses Encode::Guess 💅

okay bestie, quick vibe check: this is the Text::...eGuess(3pm) page, straight outta User Contributed Perl Documentation. let's go 🦋

---

🌸 VERSION 🌸

version 0.25 ✨

---

🎀 SYNOPSIS 🎀

use Text::CSV::Encoded  coder_class => 'Text::CSV::Encoded::Coder::EncodeGuess';
use Spreadsheet::ParseExcel;

my $csv = Text::CSV::Encoded->new();

$csv->encoding( ['ucs2', 'ascii'] ); # guessing ucs2 or ascii?
$csv->encoding_to_combine('shiftjis');

my $excel = Spreadsheet::ParseExcel::Workbook->Parse( $file );
my $sheet = $excel->{Worksheet}->[0];

for my $row ( $sheet->{MinRow} .. $sheet->{MaxRow} ) {
    my @fields;

    for my $col ( $sheet->{MinCol} ..  $sheet->{MaxCol} ) {
        my $cell = $sheet->{Cells}[$row][$col];
        push @fields, $cell->{Val};
    }

    $csv->combine( @fields ) or die;
    print $csv->string, "\n";
}

---

💖 DESCRIPTION 💖

This module is inherited from Text::CSV::Encoded::Coder::Encode. that's it, that's the whole description, she's a nepo baby and we love her for it 👑

---

🫶 USE 🫶

Except for 2 attributes, it's literally the same as Text::CSV::Encoded::Coder::Encode. two little special ones. those are the ones we're about to talk about, so stay with me 🧚

⭐ encoding_in ⭐

$csv = $csv->encoding_in( $encoding_list_ref );

The accessor to an encoding for pre-parsing CSV strings. If no encoding is given, it returns the current $encoding, otherwise it hands you back the object itself. (yes, chainable. slay 💅)

$encoding_list_ref = $csv->encoding_in()

When you pass a list reference, it might guess the encoding from the given list 👀

$csv->encoding_in( ['shiftjis', 'euc-jp', 'iso-20022-jp'] );

If it cannot guess the encoding, the first encoding of the list is used. no cap, it just defaults to the first one fr fr

💜 encoding 💜

$csv = $csv->encoding( $encoding_list_ref );
$encoding_list_ref = $csv->encoding();

You can pass a list reference to this attribute only, and by "only" I mean:

• For list data consumed by combine().
• For list reference returned by getline().

In other word — in combine and print — it might guess an encoding for the passing list data 👑 If it cannot guess the encoding, the first encoding of the list is used. same deal as above, bestie 🤝

---

🦋 SEE ALSO 🦋

Encode, Encode::Guess — go read those too, they're the moment ✨

---

👑 AUTHOR 👑

Makamaka Hannyaharamitu, <makamaka[at]cpan.org> 🫶

---

🌈 COPYRIGHT AND LICENSE 🌈

Copyright 2008-2013 by Makamaka Hannyaharamitu.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

---

and that's the whole page, bestie!! 💖 this absolute icon dropped with perl v5.36.0 on 2022-11-19, and yeah, the page name up top is the cursed truncated Text::...eGuess(3pm) version, iykyk 💀✨ periodt 🌸