X-Git-Url: http://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=perlmail-submit;h=b367979f2612c9e4bb0a1bebf1e5b6de2c19ac3a;hp=c7fe19fd9a69788e6ae170ecbfea3a3f9172d631;hb=be8e1bc69e15a29e52d8bbcde5971214a5b8340b;hpb=5d346256a5c3b4b4266b00d1adda8a56320c6171 diff --git a/perlmail-submit b/perlmail-submit index c7fe19f..b367979 100755 --- a/perlmail-submit +++ b/perlmail-submit @@ -1,6 +1,22 @@ #! /usr/bin/perl -# +# # $Id$ +# Copyright (C) 2002-2003 Jan Kratochvil +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + use vars qw($VERSION); $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };