chiark / gitweb /
use strict;
use IO::File;
+use POSIX;
our $abbrev;
our $duplicate;
$force = 1;
}
+my $sig = $ENV{'HOME'};
+defined $sig or die;
+$sig .= '/.signature';
+die $sig if stat $sig;
+die unless $!==ENOENT;
+
for (;;) {
$_ = <>;
die unless defined;