-#!/usr/bin/perl
+#!/usr/bin/env perl
#
# Take a 2 line keps email file on STDIN, prepare it for import into standard import directory
# and then shove it there, marked for SB ALL.
#
# Copyright (c) 2004 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
# open the output file in the data area
my $fn = "$root/tmp/keps.txt.$$";
open OUT, ">$fn" or die "$fn $!";
+ chmod 0666, $fn;
print OUT $inp;
close OUT;