X-Git-Url: http://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=contacts-n9k2mutt;h=ee4d9ad5f829ccbeefee17d5029db47c3ed59ad8;hp=5054de95c4ee18da5681a64f5398703c0a7884b7;hb=be8e1bc69e15a29e52d8bbcde5971214a5b8340b;hpb=5d346256a5c3b4b4266b00d1adda8a56320c6171 diff --git a/contacts-n9k2mutt b/contacts-n9k2mutt index 5054de9..ee4d9ad 100755 --- a/contacts-n9k2mutt +++ b/contacts-n9k2mutt @@ -1,6 +1,22 @@ #! /usr/bin/perl -# -# $Id$ +# +# $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; };