Come creare rapporti con il Perl

November 25

Usare Perl per creare semplici report. Include un'intestazione con un titolo, numero di pagina e altre informazioni importanti. Perl tracce quante righe sono nella relazione e fa una nuova pagina quando necessario. Questi rapporti sono utili per la segnalazione di grandi quantità di dati con una piccola uscita di testo. Creare i rapporti con un rapporto di forma libera o impostare un formato fisso.

istruzione

1 Aprire il file dell'applicazione FORMAT.DAT Perl.

2 Inserisci aperto "(FILE," <format.dat ");
@linee = ;
vicino (FILE) ;. "Imposta il formato per la relazione in modo che ogni voce è la sua propria linea.

3 Creare il corpo del Perl rapporti dando direzione Perl su cosa segnalare. Utilizzando una lista della spesa come esempio, immettere
"Per ciascuno (@linee) {

chop;
($isle, $item, $price) = (split(/!/));
print("Isle=$isle Item=$item Price=$price\n");

} "

4 Utilizzare questo formato se gli elementi del database sono tutti completi. Se ci sono elementi mancanti, il formato non rappresenteranno gli elementi mancanti. Vedere l'esempio:
Isola = 5 Prodotto = Prezzo =
Isle = 2 Prodotto = arance Prezzo = 0,32
Isola = 7 Prodotto = Potato Chips Prezzo = 2.95
Isola = 9 Prodotto = lampadine Prezzo = 2.50

5 Scrivi la lista in un altro modo, se si desidera un formato a larghezza fissa. Usa il codice
"Per ciascuno (@linee) {

chop;

($ Isle, $ oggetto, $ prezzo) = (split (/ /)!);

$ Isola = "" se definito ($ isola!); Queste linee assegnare null

$ Oggetto = "" se definito ($ item)!; stringhe se no informazioni è

$ Prezzo = "" se definito ($ prezzo!); presenti nel record.

print ( "Isola = $ isola Articolo = $ oggetto = Prezzo $ prezzo \ n");

} "

6 Uscita il Perl creato riporta simile al seguente esempio:
Isola = 5 Prodotto = Prezzo =
Isle = 2 Prodotto = arance Prezzo = 0,32
Isola = 7 Prodotto = Potato Chips Prezzo = 2.95
Isola = 9 Prodotto = lampadine Prezzo = 2.50