Steganography on audio/image with perl script

Steganography on audio/image with perl script

Could any give me some links where I could find scripts on perl for
steganagraphy process? when I surfed through web, i got only softwares for
it.
S/w like stegano