$pass = ******;
open($hndl,"|perl daemon1.pl");
open($hnd2,"|perl daemon2.pl");
print $hndl $pass;
print $hnd2 $pass;