From owner-freebsd-current@FreeBSD.ORG  Fri Dec  9 10:11:53 2011
Return-Path: <owner-freebsd-current@FreeBSD.ORG>
Delivered-To: freebsd-current@freebsd.org
Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:4f8:fff6::34])
	by hub.freebsd.org (Postfix) with ESMTP id EA25B106567B
	for <freebsd-current@freebsd.org>; Fri,  9 Dec 2011 10:11:53 +0000 (UTC)
	(envelope-from vsityz@gmail.com)
Received: from mail-bw0-f48.google.com (mail-bw0-f48.google.com
	[209.85.214.48])
	by mx1.freebsd.org (Postfix) with ESMTP id 7E0578FC1B
	for <freebsd-current@freebsd.org.>;
	Fri,  9 Dec 2011 10:11:53 +0000 (UTC)
Received: by bkas6 with SMTP id s6so2755599bka.7
	for <freebsd-current@freebsd.org.>;
	Fri, 09 Dec 2011 02:11:52 -0800 (PST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma;
	h=message-id:date:from:user-agent:mime-version:to:subject
	:content-type:content-transfer-encoding;
	bh=U52Rg0k/JaxFPNZn7rW7ZMtGhzOOH0Dp4pWl/Rhn0Q4=;
	b=k3GVtaKMFE04BajO79K6/ocVFvJXUQqGYLeApDxhVwr8az5XR2LhJDkezdCftLv9ml
	cgugxDszEUJxBLojSr4kYJLKG4M3L0HlETJKT78pVdwGUiRtRX9rP2BN1XULxGi9poKo
	o+TlfMV9xa96DqhpDi+UecuAinc3aOPzirqI0=
Received: by 10.204.152.4 with SMTP id e4mr3178714bkw.56.1323424083885;
	Fri, 09 Dec 2011 01:48:03 -0800 (PST)
Received: from admin.informalians.local (informalians.com.ua.
	[193.104.178.111])
	by mx.google.com with ESMTPS id cc2sm8422002bkb.8.2011.12.09.01.48.02
	(version=SSLv3 cipher=OTHER); Fri, 09 Dec 2011 01:48:03 -0800 (PST)
Message-ID: <4EE1D951.2030509@gmail.com>
Date: Fri, 09 Dec 2011 11:48:01 +0200
From: Alexander Panyushkin <vsityz@gmail.com>
User-Agent: Mozilla/5.0 (X11; FreeBSD amd64;
	rv:8.0) Gecko/20111109 Thunderbird/8.0
MIME-Version: 1.0
To: freebsd-current@freebsd.org.
Content-Type: text/plain; charset=KOI8-R; format=flowed
Content-Transfer-Encoding: quoted-printable
X-Mailman-Approved-At: Fri, 09 Dec 2011 12:17:16 +0000
Cc: 
Subject: Bug in Perl script
X-BeenThere: freebsd-current@freebsd.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: Discussions about the use of FreeBSD-current
	<freebsd-current.freebsd.org>
List-Unsubscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-current>, 
	<mailto:freebsd-current-request@freebsd.org?subject=unsubscribe>
List-Archive: <http://lists.freebsd.org/pipermail/freebsd-current>
List-Post: <mailto:freebsd-current@freebsd.org>
List-Help: <mailto:freebsd-current-request@freebsd.org?subject=help>
List-Subscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-current>,
	<mailto:freebsd-current-request@freebsd.org?subject=subscribe>
X-List-Received-Date: Fri, 09 Dec 2011 10:11:54 -0000

I have a script that runs command tail with open descriptor.
After 30 seconds, I close descriptor.  But descriptor not closed.
When script is closed tail is present in ps aux.

$log_file =3D path_to_log;
eval {
    local $SIG{ALRM} =3D sub { die; };
    alarm (30);
    open (LOG, "tail -F $log_file|") || die "=F3an`t open logfile=20
\"$log_file\"";
    while (<LOG>) {
        ***
    }
    alarm (0);
};
close (LOG);
print ("Ok\n");
exit(0);

This code is good working in FreeBSD 8.2, but in FreeBSD 9.0 not working.=


--
Best Regards
Alexander