#!/usr/bin/perl -w use strict; use DB_File; die "syntax: $0 filename.db [...]\n" unless @ARGV; file: for my $file (@ARGV) { my %h; dbmopen(%h, $file, 0) || do { warn "$0: dbmopen($file): $!\n"; next file; }; print "$_ -> $h{$_}\n" for keys %h; } js'>
summaryrefslogtreecommitdiff
path: root/tags/37/c6/rustls%2frustls%2fissues%2f1073%2f1186226345@github.com/inbox
diff options
context:
space:
mode:
authorJonas Smedegaard <dr@jones.dk>2023-06-27 09:35:08 +0200
committerJonas Smedegaard <dr@jones.dk>2023-06-27 09:35:08 +0200
commitfd54908da2b05c526dd3bee9b6dcd093214a220d (patch)
treec69c845069c99d1d01044f6fafda7c08433329c6 /tags/37/c6/rustls%2frustls%2fissues%2f1073%2f1186226345@github.com/inbox
parentba46132213560cf3335d53560d519c0ec0190da2 (diff)
master
Diffstat (limited to 'tags/37/c6/rustls%2frustls%2fissues%2f1073%2f1186226345@github.com/inbox')