No Subject

[wls@moviola.com (Wm. L. Scheding)]

I understand why system(); won't work on the Macintosh.

However, can I pipe commands to another perl script or program
which might support a psuedo command line interface?

for example:

$sep = ':';
$user = 'wls'
$base = $user."passwd".$sep;
$passfile = $base.".htpasswd";
$htpasswd = $base."htpasswd.pl";

# Call htpasswd.pl and encrypt the password then enter username and
# password into passfile

open(HTPASSWD, "|$htpasswd $passfile $user >/dev/null 2>&1")
  || die "Can't run $htpasswd.\nReason:$!";
print HTPASSWD "$FORM{'password'}\n";
print HTPASSWD "$FORM{'password'}\n";
close(HTPASSWD);


Thanks in advance,

Bill Scheding



***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch