Ako previesť XLS do formátu CSV na Perlu

Firmy bežne používajú Excel na ukladanie tabuliek dát . Často sa tieto spoločnosti nájsť využitie pre dáta , ktorý vyžaduje prevod do iného formátu pre ďalší softvér používať . Ale Excel súbory nie sú určené na čítanie iných programov . Údaje , ktoré obsahujú požiadavky , ktoré majú byť prevedené do spoločného formátu , ako je napríklad hodnoty oddelené čiarkami ( CSV ​​súbory ) . Pre ľudí s veľkým množstvom súborov programu Excel previesť , zvyčajný postup je ťažkopádny . Takže schopnosť Perl , aby rýchlo a ľahko zvládnuť úlohy spracovania dát príde vhod v tomto prípade . Veci , ktoré budete potrebovať
Perl alebo ActiveState Perl
CPAN ak máte Perl
PPM ak máte ActiveState Perl
Zobraziť ďalšie inštrukcie
Vytvorte si CSV súbor

1

Nainštalujte Perl modul " Spreadsheet :: ParseExcel " na vašom systéme . Toto je štandardné Perlový modul pre čítanie dát zo súborov programu Excel . Postup inštalácie závisí od typu systému

Ak máte ActiveState Perl ( napr. Perl pre Windows . ) : .

Otvorte okno príkazového riadka . Prejdite na " bin " podzložke zložky , kde sa nachádza váš program ActiveState Perl . Ak neviete , kde to je , použite funkciu vyhľadávania Windows nájsť " ActiveState " a poznačte si na " cestu k adresáru " do zložky ActiveState Perl . Potom choďte do okna príkazového riadku a zadajte " DIR " nasleduje cesta k tomuto adresáru a potom stlačte Enter . Potom zadajte " DIR bin " a stlačte kláves Return .

Typu " ppm " a stlačte Enter . Sa objaví nejaký text a potom budete môcť znova zadať príkazy . Typ " nainštalovať Spreadsheet :: ParseExcel " a stlačte Return . Sa objaví nejaký dlhší text , a potom bude inštalácia dokončená

Ak máte štandardný Perl : .

Otvorte príkazový riadok alebo okno terminálu . V systéme Mac OS X , program sa nazýva Terminal . Zadajte nasledujúci príkaz :

perl - MCPAN - e inštaláciu Spreadsheet :: ParseExcel klipart

Stlačte tlačidlo Späť . Objaví sa veľa textu a potom inštalácia bude dokončená .
2

Vytvorte si súbor programu Excel prístupné skriptu v Perlu . Vytvorte kópiu súboru programu Excel s názvom " xls_test.xls " pre tohto tutoriálu a presuňte ho do zložky , kde sa nachádza váš skript v Perlu .
3

Vložte váš súbor programu Excel do svojej perl skript s týmto kódom :

použitie Spreadsheet :: ParseExcel ;

my $ xlsparser = Spreadsheet :: ParseExcel - > new ( ) ;

my $ xlsbook = $ parser - > parse ( " xsl_test.xls ' ) ;

my $ xls = $ xls - > List ( 0 ) ;

Teraz máme objekt ( " $ xls " ) že má údaje z prvého listu nášho súboru Excel . Ak chcete získať dáta z iného listu , vymeňte nulu ( " 0 " ) vo štvrtom riadku s číslom vášho listu mínus jedna . Napríklad , číslo prvého listu je nula ( " 0 " ) , číslo tretí list , je dva ( " 2 " ) , a tak ďalej . Ak súbor váš Excel má iba jeden list , použite kód tak , ako je .
4

Zistite si , čo stĺpcov a riadkov vaše tabuľka má . Použite tento kód :

môj ( $ row_first , $ row_last ) = $ xls - > row_range ( ) ;

môj ( $ col_first , $ col_last ) = $ xls - > col_range ( ) ;
5

Vytvorenie premenné pre uloženie dát vo formáte CSV . Použite tento kód :

my $ CSV = '' ;
6

Vytvorte dát CSV . Použite tento kód , ako to urobiť :

pre moju $ row ( $ row_first .. $ row_last ) { # Krok po každom riadku

pre moju $ col ( $ col_first .. $ col_last ) { # Krok po každom stĺpci

my $ buniek = $ xls - > get_cell ( $ row , $ col ) ; # Získať aktuálne bunku

ďalšie ibaže $ bunku , klipart < p . > $ CSV = $ cell - > neformátovaný ( ) ; # Získajte bunky surové dáta - žiadne hraničné farby alebo niečo podobné , že

if ( $ col == $ col_last ) {
< p . > $ csv = " \\ n" ; # Vytvorte nový riadok na konci riadku

} else {

$ csv = " " ; . " Pridať čiarku medzi jednotlivými položka

}

}

}
7

uložiť dáta v $ csv do súboru pomocou súboru funkcie pre vytváranie Perl je . Uistite sa , že názov vášho súboru končí . " csv " pre prehľadnosť .

• Predchádzajúca strana: Ako vytvoriť PDF z textu v Perlu 
• Ďalšia strana: Ako napísať Perl Telnet skript , ktorý vyzve na zadanie hostiteľa Meno