Données :: Résultateur Module Perl pour aider à trier, paginer et afficher les ensembles de résultats
Télécharger maintenant

Données :: Résultateur Classement & Résumé

Données :: Résultateur Mots clés

tri résultats trier les résultats paginer afficher les résultats Résultats du paginate

Données :: Résultateur La description

Module Perl pour aider à trier, paginer et afficher des résultats de résultats Data :: RésultatSheLer est un module Perl écrit pour aider à afficher des résultats pouvant être considérés comme une matrice de tableau.Developer Commentaires appelez les résultats de la structure. Les exemples abondent, et plus je travaille avec elle, plus je vois des exemples. Résultats de la recherche, cotes de ticker, résumés de messagerie, une liste de répertoires, résultats de requête SQL, cela et bien plus encore! Data :: RésultatShelper prend les résultats et les modifie dans une refoue de hachage bien organisée, qui peut ensuite être émise à l'aide de modèles :: Toolkit ou similaire.Example dans l'exemple ci-dessous, I Sub-Class the Data :: RésuldeSheLer :: HTML. Données :: RésuldeShedelper est assez générale que les résultats pouvaient être émis sous un nombre de façons: un fichier CSV, XML, etc. Veuillez consulter les données :: Résultateurs :: HTML Perldoc pour plus d'informations. Je dis simplement une méthode générate_results qui définit $ auto -> {résultats}. Si auto-auto -> {set_cookie} est vrai, je tente de cacher des ensembles de résultats. Dans ce cas, Generate_Results ne serait appelé que pour générer de nouveaux résultats. #! / usr / bin / perl -w usage strict; {My $ Self = Helper-> Nouveau ({RESULTS_DIR => '/ TMP / STUNTS',}); Imprimer "Type de contenu: Texte / HTML \ N \ N"; imprimer $ auto-> résultats2html; } assistant d'emballage; utiliser strict; Utiliser les données :: résultant :: html; Utilisez la base QW (Data :: RésuldeSheLer :: HTML); sub générer_results {My $ Self = Shift; My $ dir = shift || $ auto -> {résultats_dir}; mes résultats de $ = ,]; Exiger un fichier :: trouver; Fichier :: Trouver :: Trouver (Sub {My $ FullPath = $ Fichier :: Trouver :: Nom = $ Fichier :: Rechercher :: Nom; My $ Dir = $ Fichier :: Trouver :: Dir; My @stat = Stat $ Fullpath; Retour si ($ FullPath = ~ / ~.\.\.?$/); Retour si (-D _); Push @ {$ résultats}, , $ stat ];}, $ dir); $ auto -> {résultats} = résultats $; } Exigences: · Perl

Données :: Résultateur Logiciels associés