Termine :: Report. Modo semplice per creare Dynamic 'Rapporti' da uno degli script
Scarica ora

Termine :: Report. Classifica e riepilogo

Termine :: Report. Tag

modulo Perl rapporti perl dinamico Rapporti dinamici

Termine :: Report. Descrizione

Modo semplice per creare le "report" dinamiche da dentro script Termine :: Report è un modulo Perl che può essere utilizzato per generare un'uscita dinamica ben formattata. Può anche utilizzare termine :: statusbar per mostrare progressi e numero :: Formato in modo che i numeri si presentano più leggibili. Tutte le uscite vengono inviate a STDOUT per impostazione predefinita. La versione corrente potrebbe non essere compatibile con il codice precedente. Molte modifiche sono state fatte per quanto riguarda il modo in cui l'output potrebbe essere formattato.synopsis uso termine :: report; Usa tempo :: Hires QW (USLeep); My $ articoli = 100; My $ report = Term :: Report-> Nuovo (StarTrow => 4, NumFormat => 1, Statusbar => ,); My $ Status = $ report -> {statusbar}; $ Status-> Setyems ($ articoli); $ Status-> Start; $ report-> Savepoint ('Total', "Widget totali:", 1); $ report-> Savepoint ('scartato', "\ n Widget scartati:", 1); per (1. $ articoli) {$ report-> FinePrint ('Total', 0, $ _); Se (! ($ _% INT ((RAND (10) + RAND (10) +1)))) {$ report-> FinePrint ('scartato', 0, ++ $ scartare); $ Status-> Subtext ("Scartando il widget Bad"); } else {$ status-> Subtext ("widget di localizzazione"); } Usleep (75000); $ stato-> Aggiornamento; } $ Stato-> Reset ({reverse => 1, Subtext => 'widget di elaborazione', setITEM => ($ articoli- $ scartare), avvio => 1}); $ report-> Savepoint ('Inventory', "\ n \ Ninventorying widget ...", 1); per (1 .. ($ articoli- $ scarto)) {$ report-> FinePrint ('Inventory', 0, $ _); $ stato-> Aggiornamento; } $ report-> Printbarreport ("\ n \ n \ n \ n Riepilogo per widget: \ n \ n", {"Total:" => $ Articoli, "Buoni widget:" => $ Articoli- $ scartare, " Bad widget: "=> $ scarto,}); Requisiti: · Perl.

Termine :: Report. Software correlato