Added Perlin Module

And unit tests too !
```octave``` devrait être un int.
```double Noise::discreteNoise(long x, long y, int octave)```