• # une solution Perlesque

    Posté par (site web personnel, Mastodon) . En réponse au message Le plus petit. Évalué à 1.

    Voici comment faire avec un algo simple en Perl (on boucle de 5 en 5, on récupère le nombre de connectés, si il est inférieur au précédent on récupère le nom du serveur) :

    #!/usr/bin/env perl
    use strict; use warnings;
    my (%hash, $server, $maxValue, $oldValue);
    my @file = split " ", <>;
    for (my $i = 0; $i < $#file; $i+=5) {
     $maxValue = $file[$i];
     if ($maxValue < $oldValue) {
     $server = $file[$i+4];
     }
     $oldValue = $maxValue;
    }
    print "Le serveur le moins chargé est $server\n";
    # vim:ts=4:sw=4
    
    

    Usage :

    cat FILE | perl script.pl
    
    

    On ne peut pas mettre d'array dans le string...