PERLIN NOISE CODE

I’m looking for source code using Perlin noise with shaders (marble , wood,granite ecc) , if you have it plz share it , it will be very helpfull.
thanks Bye

I found an old code of a perlin noise generator I made a cupple of years ago (from srcrratch using hugo elias info):

http://dzzd.net/demo/PERLINSample/

EDIT:
ps: this is not shader related but on another hand you may rather post such request in OGL/Cluebies section, no ?