Begriff :: Bericht.Einfache Möglichkeit, dynamische "Berichte" von in der Skripts erstellen | |
Jetzt downloaden |
Begriff :: Bericht. Ranking & Zusammenfassung
Anzeige
- Lizenz:
- Perl Artistic License
- Preis:
- FREE
- Name des Herausgebers:
- Shay Harding
- Website des Verlags:
- http://search.cpan.org/~shayh/
Begriff :: Bericht. Stichworte
Begriff :: Bericht. Beschreibung
Einfache Möglichkeit, dynamische "Berichte" von Skripts zu erstellen Begriff :: Bericht ist ein Perl-Modul, mit dem Sie eine schön formatierte dynamische Ausgabe generieren können. Es kann auch den Begriff :: Statusbar verwenden, um den Fortschritt und die Nummer anzuzeigen :: Format, so Zahlen zeigen mehr lesbarer. Der gesamte Ausgang wird standardmäßig an STDOUT gesendet. Die aktuelle Version ist möglicherweise nicht mit dem vorherigen Code kompatibel. Viele Änderungen wurden in Bezug auf die formatierte Leistung vorgenommen. Synopsis verwenden Begriff :: Bericht; Zeiteinsatz :: HIRES QW (Usleep); meine $ Artikel = 100; My $ report = term :: report-> neu (starTrow => 4, numformat => 1, statusbar => ,); mein $ status = $ report -> {statusbar}; $ status-> setitems ($ items); $ status-> starten; $ report-> speicherpunkt ('total', "total widgets:", 1); $ report-> safepoint ('decorcedd', "\ n Widgets verworfen:", 1); für (1 .. $ Artikel) {$ report-> feinprint ('total', 0, $ _); if (! ($ _% int ((rand (10) + rand (10) +1)))) {$ report-> fineprint ('decorced', 0, ++ $ discard); $ status-> subtext ("decorcarding bad widget"); } else {$ status-> subtext ("SOCATING WIDGETS"); } Usleep (75000); $ status-> update; } $ status-> zurücksetzen ({rückwärts => 1, subtext => 'Bearbeitungsweiten', SetItems => ($ items- $ obcard), starten => 1}); $ report-> safepunkt ("Inventar", "\ n \ ninventorying Widgets ...", 1); für (1 .. ($ $ upstarts - $ obcard)) {$ report-> feinprint ('Inventar', 0, $ _); $ status-> update; } $ Report-> PrintBarreport ("\ n \ n \ n \ n Summary für Widgets: \ n \ n", {"Total:" => $ Elements, "Gute Widgets:" => $ items - defard, " Bad Widgets: "=> $ obscard,}); Anforderungen: · Perl.
Begriff :: Bericht. Zugehörige Software