Gegevens :: ResultsHelper PERL-module om te sorteren, pagineren en resultaten van resultaten weergeven
Download nu

Gegevens :: ResultsHelper Rangschikking & Samenvatting

Gegevens :: ResultsHelper Tags

sortering resultaten Sorteer resultaten pagineren resultaten weergeven paginate resultaten

Gegevens :: ResultsHelper Beschrijving

Perl-module om resultaten te sorteren, te pagineren en te weergeven Gegevens :: ResultsHelper is een Perl-module die is geschreven om de resultaten weer te geven die kunnen worden gedacht als een reeks arrays.Developer COMMERTIONSI CALL de resultaten van de structuur. Voorbeelden zijn er in overvloed, en hoe meer ik ermee werk, hoe meer ik voorbeelden zie. Zoekresultaten, stockticker Quotes, Message Message Samenvattingen, een directory lijst, SQL Query Resultaten, dit en nog veel meer! Data :: ResultsHelper neemt de resultaten en verandert ze in een mooi georganiseerde hash Ref, die vervolgens kan worden uitgevoerd met behulp van sjabloon :: toolkit of dergelijke.Example in het onderstaande voorbeeld, I Subklasse De gegevens :: ResultatenHelper :: HTML. Gegevens: ResultatenHelper is algemeen genoeg dat de resultaten op een gegeven moment kunnen worden uitgevoerd: een CSV-bestand, XML, enz. Raadpleeg de gegevens :: ResultsHelper :: HTML PERLDOC voor meer informatie. Ik schrijf gewoon een Generate_results-methode die $ zelf -> {resultaten} instelt. Als $ self -> {set_cookie} waar is, probeer ik het resultaat-sets te cachen. In dat geval zouden generate_results alleen worden geroepen om verse resultaten te genereren. #! / usr / bin / Perl -W gebruik strikt; {mijn $ self = helper-> nieuw ({resultaten_dir => '/ tmp / spul',}); Print "Inhoudstype: Tekst / HTML \ N \ N"; Print $ self-> resultaten2html; } Pakkethelper; strikt gebruik; Gebruik gegevens :: ResultsHelper :: HTML; Gebruik basis qw (gegevens :: resultatenhelper :: HTML); Subgenereer_resultaten {mijn $ zelf = verschuiving; mijn $ dir = shift || $ zelf -> {resultaten_dir}; Mijn $ resultaten = ,]; vereisen bestand :: vonds; Bestand :: Vinden :: Vind (Sub {My $ Fullpath = $ Bestand :: Vinden :: NAME = $ Bestand :: Vinden :: Naam; Mijn $ DIR = $ Bestand :: Vinden :: DIR; MY @Stat = Stat $ FULLPAPPATH; RETURN IF ($ FULLPATH = ~ / I.\.\.?$/); RETURN IF (-D _); Druk op @ {$ resultaten}, , $ stat ];}, $ dir); $ self -> {resultaten} = $ resultaten; } Vereisten: · Perl

Gegevens :: ResultsHelper Gerelateerde software