Vraag & Antwoord

Webprogrammeren & scripting

[PHP]+[PERL] - zoekfunctie

Anoniem
Error404
1 antwoord
  • ik heb een klasse genaamd Perl met een functie erin

    [code:1:a6565c45fe]
    //Perl.class.php
    class Perl
    {
    function execute($script)
    {
    print(exec ("perl $script"));

    }
    }
    [/code:1:a6565c45fe]

    de functie uit deze klasse laat ik door een while loop langs alle tekst bestanden heen lopen om zoekresutlaten op te vangen

    [code:1:a6565c45fe]if ($handle = opendir($sub))
    {

    while (false !== ($file = readdir($handle)))
    {
    if ($file != "." && $file != ".." && strtolower(substr($file, -3)) == 'txt')
    {
    require_once("Perl.class.php");
    $perl = new Perl();
    $perl->execute("perlbestand.pl $sub/$file \"$text\" ");
    }
    }
    closedir($handle);
    }
    [/code:1:a6565c45fe]

    Maar soms zijn er geen zoekresultaten en dan wil ik zoiets als 'Er zijn geen zoekresultaten gevonden' in beeld hebben. Ik had zoiets in het perl bestandje staan maar omdat het word uitgevoerd in een while loop word het een aantal keer uitgeprint.

    Hoe krijg ik zoiets 1 keer uitgeprint ?


    Ps.:
    mij is gevraagd de perl code te gebruiken, er is voor betaald dus vandaar
    verder ben ik niet zo goed in perl, dus heb ik perl en php in deze functie gecombineerd en perl kun je alleen combineren met php vanaf versie 5

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.