Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Otvorte Perl aplikácie FORMAT.DAT súbor 
 2 
 Zadajte open " ( súbor , " @ lines = ; . Close ( súbor ) ; . " Toto nastavenie formát správy tak , aby každá časť je jeho vlastná riadok . 
 3 
 Vytvorte telo Perl správ tým , že Perl smer na čo hlásiť . Pomocou zoznam potravín ako napríklad , zadajte " pre každého ( @ riadkov ) { kotleta , ( $ ostrov , $ položku , $ cena ) = ( split ( //) ! ) ; print ( " Isle = $ ostrov Item = $ item cena = $ cena \\ n " .. ) ; } " 
 4 
 Tento formát použite , ak databáza položky sú kompletné ak sú položky chýba , bude formát nie je účet pre chýbajúce položky Viď príklad : Isle = 5 Č = cena = Isle = 2 Item = Pomaranče cena = 0.32Isle = 7 Item = zemiačiky cena = 2.95Isle = 9 Č = Žiarovky cena = 2.50 
 5 
 Napíšte zoznamu iný spôsob , ak chcete . pevnou šírkou formát použite kód " pre každého ( @ lines ) { 
 
 kotleta ; 
 
 ( $ ostrovček , $ položku , $ cena ) = ( ! split ( //) ) ; 
 
 $ isle = " " ak je definovaná ( $ ostrov ) ; ! Tieto riadky priradiť hodnotu null 
 
 $ item = " " , ak sú definované ( $ item ) ; ! reťazca , ak žiadne info je 
 
 $ cena = " " , ak je definované ( $ cena ) ; ! . prítomný v zázname 
 
 print ( " Isle = $ ostrov Item = $ item cena = $ cena \\ n" ) ; 
 
 } " 
 6 
 Výstupný vytvoril Perl správy podobné nasledujúcom príklade : Isle = 5 ks = cena = Isle = 2 Položka = Pomaranče cena = 0.32Isle = 7 Položka = zemiakové lupienky cena = 2.95Isle = 9 Č = Žiarovky cena = 2.50