Searched refs:fh (Results 301 - 325 of 535) sorted by relevance

<<11121314151617181920>>

/openbsd-current/gnu/usr.bin/perl/dist/Net-Ping/lib/Net/
H A DPing.pm222 $self->{fh} = FileHandle->new();
223 socket($self->{fh}, PF_INET, SOCK_DGRAM,
234 $self->{fh} = FileHandle->new();
235 socket($self->{fh}, PF_INET, SOCK_RAW, $self->{proto_num}) ||
239 setsockopt($self->{fh}, IPPROTO_IP, IP_TTL, pack("I*", $self->{'ttl'}))
252 $self->{fh} = FileHandle->new();
253 socket($self->{fh}, $AF_INET6, SOCK_RAW, $self->{proto_num}) ||
265 setsockopt($self->{fh}, $IPPROTO_IPV6, $IPV6_NEXTHOP, _pack_sockaddr_in($ip))
270 setsockopt($self->{fh}, $IPPROTO_IPV6, $IPV6_USE_MIN_MTU,
276 setsockopt($self->{fh},
[all...]
/openbsd-current/gnu/usr.bin/perl/regen/
H A Dopcode.pl386 my $fh = shift;
389 printf $fh "#define %-23s 0x%02x\n", $_, $DEFINES{$_};
397 my $fh = shift;
508 print $fh $header;
510 print $fh qq{\nour \$VERSION = "$v";\n\n};
533 print $fh "\$bits{\$_}{$bit} = '$flag' for qw(@o);\n";
578 print $fh "$s\n";
615 print $fh "$s;\n";
621 print $fh "\n\nour %defines = (\n";
622 printf $fh "
[all...]
/openbsd-current/gnu/usr.bin/perl/
H A Dconfigpm684 if (open(my $fh, '<', 'cflags')) {
687 while (<$fh>) {
831 if (open my $fh, '<', $f) {
832 while (<$fh>) {
1182 my $fh;
1183 $orig_config_txt = <$fh> if open $fh, "<", $Config_PM;
1184 $orig_heavy_txt = <$fh> if open $fh, "<", $Config_heavy;
/openbsd-current/usr.bin/libtool/LT/Mode/
H A DLink.pm30 open(my $fh, '-|', '/sbin/ldconfig -r');
31 if (!defined $fh) {
34 while (<$fh>) {
40 close($fh);
848 open my $fh, ">", $scriptfile or die;
850 print $fh $comment;
851 print $fh "{\n";
856 print $fh "\tglobal:\n";
859 print $fh "\t\t$_;\n";
861 print $fh "\tloca
[all...]
/openbsd-current/gnu/usr.bin/perl/dist/ExtUtils-ParseXS/t/
H A D513-t-merge.t14 open my $fh, '<', $file
17 return <$fh>;
/openbsd-current/gnu/usr.bin/perl/t/io/
H A Dopen.t252 ok( open(my $stdout, ">&", \*STDOUT), 'dup \*STDOUT into lexical fh');
254 ok( open(STDOUT, ">&", $stdout), 'restore dupped STDOUT from lexical fh');
258 ok( open(my $stdout, ">&", STDOUT), 'dup STDOUT into lexical fh');
263 ok( open(my $stdin, "<&", fileno STDIN), 'dup fileno(STDIN) into lexical fh') or _diag $!;
301 like($@, qr/<\$fh0\[...\]> line 1\./, "autoviv fh package aelem");
306 like($@, qr/<\$fh1\{...}> line 1\./, "autoviv fh package helem");
312 like($@, qr/<\$fh2\[...\]> line 1\./, "autoviv fh lexical aelem");
318 like($@, qr/<\$fh3\{...}> line 1\./, "autoviv fh lexical helem");
355 'sub f { open(my $fh, "xxx"); $fh
[all...]
/openbsd-current/gnu/usr.bin/perl/Porting/
H A Dleakfinder.pl43 open my $fh, "-|", $^X, "-Ilib", "-MXS::APItest=sv_count",
46 $out = <$fh>;
47 close $fh;
129 @prgs = (@prgs, $file, split "\n########\n", <$fh>) ;
/openbsd-current/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/
H A Dvstrings.t87 open my $fh, '<', $file or return "$file: $!\n";
88 join q{}, grep { $_ =~ /Fake/i } <$fh>;
/openbsd-current/gnu/usr.bin/perl/cpan/File-Temp/t/
H A Dfork.t66 my ($fh, $filename) = File::Temp::tempfile( UNLINK => 1 );
/openbsd-current/gnu/usr.bin/perl/cpan/Pod-Simple/lib/Pod/Simple/
H A DDumpAsXML.pm28 my $fh = $_[0]{'output_fh'};
32 print $fh ' ' x ($_[0]{'indent'} || 0), "<", $_[1];
38 print $fh ' ', $key, '="', $value, '"';
43 print $fh ">\n";
/openbsd-current/gnu/usr.bin/perl/lib/
H A DPerlIO.pm39 open(my $fh, "<:crlf", "my.txt") or die "open failed: $!";
42 open(my $fh, ">>:encoding(UTF-8)", "some.log")
46 open(my $fh, "<", "his.jpg") or die "open failed: $!";
47 binmode($fh) or die "binmode failed: $!";
152 binmode $fh, ":raw:encoding(UTF-16LE):crlf"
193 C<binmode($fh)> - the stream is made suitable for passing binary data,
215 open(my $fh,">:raw:encoding(UTF-8)",...)
228 open(my $fh,...) or die "open failed: $!";
230 binmode($fh,":encoding(...)") or die "binmode failed: $!";
233 binmode($fh,"
[all...]
/openbsd-current/gnu/usr.bin/perl/cpan/IO-Compress/bin/
H A Dzipdetails1251 my $fh = $_[0] ;
1255 seek($fh, $size, SEEK_SET);
1261 my $fh = $_[0] ;
1265 seek($fh, $size, SEEK_CUR);
1841 # my $fh = shift;
1849 # $fh->read($buffer, $len) == $len
1858 my $fh = shift;
1969 my $fh = shift;
1971 my $here = $fh->tell();
1978 my $offset = findCentralDirectoryOffset($fh);
[all...]
/openbsd-current/gnu/usr.bin/perl/cpan/HTTP-Tiny/t/
H A D110_mirror.t52 open my $fh, ">", $tempfile;
53 close $fh;
/openbsd-current/usr.sbin/tcpdump/
H A Dparsenfsfh.c100 Parse_fh(caddr_t *fh, my_fsid *fsidp, ino_t *inop, argument
104 unsigned char *fhp = (unsigned char *)fh;
310 memcpy((char *)fsidp, (char *)fh, 14);
316 memcpy((char *)tempa, (char *)fh, 14); /* ensure alignment */
/openbsd-current/gnu/usr.bin/perl/t/
H A Dtest.pl1248 my $fh = shift;
1253 while (<$fh>) {
1279 open my $fh, '<', $file or die "Cannot open $file: $!\n" ;
1281 while (<$fh>) {
1299 my ($t, @p) = _setup_one_file($fh, $file);
1303 close $fh
1416 open my $fh, '>', $filename or die "Cannot open $filename: $!\n";
1417 print $fh $code;
1418 close $fh or die "Cannot close $filename: $!\n";
1424 open my $fh, '>',
[all...]
/openbsd-current/gnu/usr.bin/perl/t/porting/
H A Ddeprecation.t31 open my $fh, "<", $pod_file
39 while (<$fh>) {
/openbsd-current/usr.sbin/pkg_add/OpenBSD/
H A DPackingElement.pm107 sub write($self, $fh)
112 say $fh "\@", $self->keyword, "$s";
114 say $fh $s;
119 sub write_no_sig($self, $fh)
121 $self->write($fh);
124 sub write_without_variation($self, $fh)
126 $self->write_no_sig($fh);
340 sub write($self, $fh)
342 print $fh "\@comment no checksum\n" if defined $self->{nochecksum};
343 print $fh "\
[all...]
/openbsd-current/gnu/usr.bin/perl/lib/ExtUtils/
H A DEmbed.pm34 my($fh,@mods,%seen);
51 $fh = \*STDOUT;
54 open $fh, '>', $file
61 print $fh &xsi_header();
62 print $fh "\nEXTERN_C void xs_init ($xsinit_proto);\n\n";
63 print $fh &xsi_protos(@mods);
65 print $fh "\nEXTERN_C void\nxs_init($xsinit_proto)\n{\n";
66 print $fh &xsi_body(@mods);
67 print $fh "}\n";
/openbsd-current/gnu/usr.bin/perl/cpan/CPAN/lib/CPAN/
H A DHandleConfig.pm350 my($fh) = FileHandle->new;
352 open $fh, ">$configpm" or
354 $fh->print(qq[$msg\$CPAN::Config = \{\n]);
361 $fh->print(
367 $fh->print("};\n1;\n__END__\n");
368 close $fh;
634 my $fh = FileHandle->new;
635 if ($fh->open(">$configpm")) {
636 $fh->print("1;\n");
H A DFTP.pm21 my($fh, $file) = @_;
25 until (open $fh, "+>>$file") {
36 my($self,$fh) = @_;
39 my $locktype = $fh ? LOCK_EX : LOCK_SH;
45 $fh ||= FileHandle->new;
47 _plus_append_open($fh,$file);
50 while (!CPAN::_flock($fh, $locktype|LOCK_NB)) {
63 _plus_append_open($fh, $file);
87 CPAN::_flock($fh, LOCK_UN);
119 my $fh
[all...]
/openbsd-current/usr.sbin/nsd/
H A Dverify.c202 if(verifier->zone_feed.fh != NULL) {
204 fclose(verifier->zone_feed.fh);
205 verifier->zone_feed.fh = NULL;
231 print_rr(verifier->zone_feed.fh,
238 fclose(verifier->zone_feed.fh);
239 verifier->zone_feed.fh = NULL;
539 verifier->zone_feed.fh = fin;
551 fileno(verifier->zone_feed.fh),
597 verifier->zone_feed.fh = NULL;
/openbsd-current/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/IPC/Driver/
H A DFiles.pm85 open(my $fh, '>', $hfile) or $self->abort_trace("Could not create hub file '$hid': $!");
86 print $fh "$$\n" . get_tid() . "\n";
87 close($fh);
100 open(my $fh, '<', $hfile) or $self->abort_trace("Could not open hub file '$hid': $!");
101 my ($pid, $tid) = <$fh>;
102 close($fh);
228 open(my $fh, '>>', $abort) or die "Could not open abort file: $!";
229 print $fh $msg, "\n";
230 close($fh) or die "Could not close abort file: $!";
/openbsd-current/gnu/usr.bin/perl/ext/VMS-Stdio/
H A DStdio.pm64 $fh = vmsopen("my.file","rfm=var","alq=100",...) or die $!;
65 $name = getname($fh);
66 print $fh "Hello, world!\n";
67 flush($fh);
68 sync($fh);
69 rewind($fh);
70 $line = <$fh>;
71 undef $fh; # closes file
72 $fh = vmssysopen("another.file", O_RDONLY | O_NDELAY, 0, "ctx=bin");
73 sysread($fh,
[all...]
/openbsd-current/usr.sbin/rpc.lockd/
H A Dlockd_lock.c65 fhconv(nfs_fhandle_t *fh, const netobj *rfh) argument
77 fh->fhdata = malloc(sz);
78 if (fh->fhdata == NULL) {
81 fh->fhsize = sz;
82 memcpy(fh->fhdata, rfh->n_bytes, sz);
87 fhfree(nfs_fhandle_t *fh) argument
90 free(fh->fhdata);
180 if (fhconv(&filehandle, &lock->fh)) {
232 if (fhconv(&newfl->filehandle, &lckarg->alock.fh)) {
279 /* look for a lock rq from this host for this fh */
[all...]
/openbsd-current/gnu/llvm/clang/www/demo/
H A Dindex.cgi112 my $fh = $msg->open();
113 print $fh $body;
114 $fh->close();
326 my $fh = $c->upload('uploaded_file');
327 if ( !$fh ) {
330 while (<$fh>) {
333 close $fh;

Completed in 191 milliseconds

<<11121314151617181920>>