Bonjour,

Je dispose de code Java que je voudrais réécrire en Perl, et j'ai toutes les peines du monde sur la fonction longHashcode(String str) que voici :

    public static long longHashCode(String str) {

        long h = 0;

        byte val[] = str.getBytes();

        int len = str.length();

        for (int i = 0; i 
            h = 31 * h + val[i];

        return h;

    }

Voici deux exemples de ce que me renvoie ce code pour deux entrées :
short_string => 3010251491749729588
rather_longer_longer_string => (…)

Bonjour, J'ai sous MySQL des données représentant des actions horodatées attribuées à des utilisateurs, ce qui donne quelque chose comme ceci :

______________________________________
|        Date           |  Individu   | 
|  2005-06-02 12:05:00  |  Pierre     |
|  2005-06-02 12:05:10  |  Pierre     |
|  2005-06-02 12:06:00  |  Paul        |
|  2005-06-02 12:10:00  |  Jacques     |
|  2005-06-02 12:11:30  |  Jacques     |
|  2005-06-02 12:20:00  |  Pierre     |
|  2005-06-02 12:30:00  |  Jacques     |
|  ....                 |  ....       |
______________________________________

Je souhaiterais faire une (…)