Lines Matching refs:FH
537 open(FH, ">", $filename) or die;
538 print FH $sexp;
539 close FH;
566 open(FH, ">$sigfile") or die "Cannot create file $sigfile: $?";
567 print FH "(sig-val(dsa(r #$r#)(s #$s#)))";
568 close FH;
989 open(FH, ">", $filename) or die;
990 print FH pem_cert($der);
991 close FH;
1024 open(FH, ">$filename.cnf") or die "Cannot create file $filename.cnf: $?";
1025 print FH $asn1;
1026 close FH;
1410 open(FH, ">$sigfile") or die "Cannot create file $sigfile: $?";
1411 print FH hex2bin($signature);
1412 close FH;