Gebruik Perl om eenvoudige rapporten te maken . Een header met een titel , paginanummer en andere belangrijke informatie . Perl tracks hoeveel regels zijn in het rapport en maakt een nieuwe pagina wanneer dat nodig is. Deze rapporten zijn handig voor het rapporteren veel gegevens met een kleine tekst -uitgang . Maak de rapporten met behulp van een vrije - vorm verslag of stel een vast formaat . Instructies 1 Open uw Perl applicatie FORMAT.DAT bestand kopen van 2 Enter open " (FILE , " @ lijnen = ; . Dicht (FILE ) ; . " Deze sets de vorm van het verslag , zodat elk item is een eigen lijn . 3 Maak het lichaam van de Perl verslagen door het geven van Perl richting over wat te melden . gebruik van een boodschappenlijstje als voorbeeld , voer " voor iedere ( @ lijnen ) { chop ; ( $ eiland , $ post , $ prijs ) = ( split ( //) ! ) , letter ( " eiland = $ isle Item = $ Item Prijs = $ prijs \\ n " ) ; } " 4 Gebruik deze indeling als de database-items zijn allemaal compleet als er ontbrekende items , zal het formaat niet goed zijn voor de ontbrekende items Zie het voorbeeld : Isle = 5 Item . . = Prijs = Isle = 2 Item = Sinaasappelen Prijs = 0.32Isle = 7 artikel = Potato Chips Prijs = 2.95Isle = 9 artikel = Gloeilampen Prijs = 2.50 5 Schrijf de lijst een andere manier als je wilt . met een vaste breedte formaat Gebruik de code " voor iedere ( @ lijnen ) { chop ; ( $ eiland , $ post , $ prijs ) = ( split ( //) ! ) ; $ isle = " " als gedefinieerd ( $ isle ) ; ! Deze lijnen toewijzen null $ Item = " " als gedefinieerd ( $ item) ; ! strijkers als er geen informatie is < br $ prijs > = " " als gedefinieerd ( $ prijs ) ; ! aanwezig in het record afdruk . ( " eiland = $ isle Item = $ Item Prijs = $ prijs \\ n " ) ; < br > } " Output 6 de geschapen Perl rapporten vergelijkbaar met het volgende voorbeeld : Isle = 5 Item = Prijs = Isle = 2 Item = Sinaasappelen Prijs = 0.32Isle = 7 artikel = Potato Chips prijs = 2.95Isle = 9 artikel = Gloeilampen Prijs = 2.50
|