From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <altlinux-community@yandex.ru>
From: ABATAPA <altlinux-community@yandex.ru>
To: ALT Linux Community <community@lists.altlinux.org>
Date: Sat, 26 May 2007 14:51:24 +0400
User-Agent: KMail/1.9.6
References: <46570601.9010108@mail.ru>
In-Reply-To: <46570601.9010108@mail.ru>
MIME-Version: 1.0
Content-Type: text/plain;
  charset="koi8-r"
Content-Transfer-Encoding: 8bit
Content-Disposition: inline
Message-Id: <200705261451.25570.altlinux-community@yandex.ru>
Subject: Re: [Comm] =?koi8-r?b?+sHEwd7LwSDOwSDQxdLM?=
X-BeenThere: community@lists.altlinux.org
X-Mailman-Version: 2.1.9rc1
Precedence: list
Reply-To: ALT Linux Community <community@lists.altlinux.org>
List-Id: ALT Linux Community <community.lists.altlinux.org>
List-Unsubscribe: <https://lists.altlinux.org/mailman/listinfo/community>,
	<mailto:community-request@lists.altlinux.org?subject=unsubscribe>
List-Archive: <http://lists.altlinux.org/pipermail/community>
List-Post: <mailto:community@lists.altlinux.org>
List-Help: <mailto:community-request@lists.altlinux.org?subject=help>
List-Subscribe: <https://lists.altlinux.org/mailman/listinfo/community>,
	<mailto:community-request@lists.altlinux.org?subject=subscribe>
X-List-Received-Date: Sat, 26 May 2007 10:53:00 -0000
Archived-At: <http://lore.altlinux.org/community/200705261451.25570.altlinux-community@yandex.ru/>
List-Archive: <http://lore.altlinux.org/community/>
List-Post: <mailto:mandrake-russian@linuxteam.iplabs.ru>

25 мая 2007 г. Avramenko Andrew написал:
> Передаем в качестве HTTP_AUTH_USER a8@a.com, в результате:
> print $ENV{"HTTP_AUTH_USER"); выдает a8@a.com
> print $login; выдает a2@a.com
Ваш код в студию.
Имеем:
# cat test.pl
#!/usr/bin/perl -w

my $login = $ENV{"HTTP_AUTH_USER"};

printf("'%s'\n", $ENV{"HTTP_AUTH_USER"});
printf("'%s'\n", $login);
print $login;


Запускаем:

# HTTP_AUTH_USER='a8@a.com' perl test.pl
'a8@a.com'
'a8@a.com'
a8@a.com#


Так что же не так?
-- 
ABATAPA