help with system( )

[sansbacon]

i am looking to automate the creation of username/passwords for digest
authentication via a simple perl script. i found a module on cpan for
htpasswd but not htdigest.

the system call is htdigest /usr/local/apache/passwd/digest realm
username

then you are prompted to enter and reenter the password
how do i send the password via a perl script?

thank you for your assistance,
eric