| טקסט :: CSV :: קידוד קידוד מודעות טקסט :: CSV |
הורד עכשיו |
טקסט :: CSV :: קידוד דירוג וסיכום
- רישיון:
- Perl Artistic License
- שם המפרסם:
- Makamaka Hannyaharamitu
- אתר האינטרנט של המוציא לאור:
- http://search.cpan.org/~makamaka/
טקסט :: CSV :: קידוד תגים
טקסט :: CSV :: קידוד תיאור
קידוד מודעות טקסט :: CSV טקסט :: CSV :: קידוד הוא מודול Perl כי יורש טקסט :: CSV והוא מודע לקלט / פלט entodings.Syopsis # כאן ב Perl 5.8 או מאוחר יותר $ csv = text :: csv :: מקודד-> חדש ({undoding_in => "ISO-8859-1", # קידוד מגיע לקידוד Perl_Out => "CP1252", # קידוד יוצא מפרל}); # ניתוח CSV נחשב קלט $ CSV-> לנתח ($ שורה); # $ line הוא ISO-8859-1 מקודד מחרוזת @columns = $ csv-> שדות (); # הם נתונים Unicode # שילוב רשימה נחשב כתוצאה $ CSV-> לשלב (@columns); # הם נתונים Unicode $ line = $ csv-> מחרוזת (); # $ line הוא מחרוזת מקודד CP1252 # אם אתה רוצה לחזור @columns להיות מקודד ב $ קידוד # או רוצה לשלב @columns כדי להניח $ קידוד $ csv-> קידוד ($ קידוד); # שינוי קידוד קלט / פלט $ CSV-> Encoding_in ('ShiftJis') -> קידוד_OUT ('UTF8'); $ CSV-> EOL ("\ n"); פתוח ($ שלי ב, "sjis.csv"); פתח ($ שלי החוצה, "פלט.סו"); # לשנות קידוד מ Shingjis ל UTF8 בזמן ($ העמודות שלי = $ CSV-> Getline ($ ב)) {$ csv-> הדפסה ($ csv-> הדפסה) $, $, $ עמודות); } סגור ($ ב); סגור ($ החוצה); # קיצורי דרך פשוטים # (ללא קשר emcoding_in / out קידוד) $ uni_columns = $ csv-> לפענח ('EUC-JP', $ Line); # EUC-JP => Unicode $ Line = $ CSV-> קידוד ('EUC-JP', $ uni_columns); # Unicode => EUC-JP דרישות: · פרל
טקסט :: CSV :: קידוד תוכנה קשורה