scripting the passwd command

does anyone know where I can find a simple adduser
program (preferiblay perl) that will add users
to passwd and smbpasswd at the same time?

Bill Warner
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com