From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <at@turbinal.org>
From: at@turbinal.org
Date: Sat, 2 Nov 2002 17:01:12 +0300
To: devel@altlinux.ru
Cc: Mikhail Zabaluev <mhz@altlinux.org>
Message-ID: <20021102140112.GA3045@homestead.turbinal.org>
Mail-Followup-To: devel@altlinux.ru,
	Mikhail Zabaluev <mhz@altlinux.org>
References: <20021029232742.GA18900@homestead.turbinal.org> <20021030234453.GA6989@homestead.turbinal.org> <20021102094958.GD6621@mhz.mikhail.zabaluev.name>
Mime-Version: 1.0
Content-Type: text/plain; charset=cp1251
Content-Disposition: inline
Content-Transfer-Encoding: 8bit
In-Reply-To: <20021102094958.GD6621@mhz.mikhail.zabaluev.name>
Subject: [devel] Re: /usr/lib/rpm/perl.req -- patch
Sender: devel-admin@altlinux.ru
Errors-To: devel-admin@altlinux.ru
X-BeenThere: devel@altlinux.ru
X-Mailman-Version: 2.0.9
Precedence: bulk
Reply-To: devel@altlinux.ru
List-Unsubscribe: <http://altlinux.ru/mailman/listinfo/devel>,
	<mailto:devel-request@altlinux.ru?subject=unsubscribe>
List-Id: <devel.altlinux.ru>
List-Post: <mailto:devel@altlinux.ru>
List-Help: <mailto:devel-request@altlinux.ru?subject=help>
List-Subscribe: <http://altlinux.ru/mailman/listinfo/devel>,
	<mailto:devel-request@altlinux.ru?subject=subscribe>
List-Archive: <http://altlinux.ru/pipermail/devel/>
Archived-At: <http://lore.altlinux.org/devel/20021102140112.GA3045@homestead.turbinal.org/>
List-Archive: <http://lore.altlinux.org/devel/>
List-Post: <mailto:devel@altlinux.org>

On Sat, Nov 02, 2002 at 12:49:58PM +0300, Mikhail Zabaluev wrote:
> Есть ещё и более вкусная штучка -- B::Xref, которая выдаёт
> файлы и пакеты, использованные на этапе компиляции.

Здесь опять 100% завязка на серду сборки.
Наверное, нужно комбинировать несколько методов. :)

> Попробуйте:
> 
> perl -MO=Xref,r <скрипт> | grep ^File

$ perl -MO=Xref,r /usr/lib/perl5/find.pl | grep ^File
/usr/lib/perl5/find.pl syntax OK
File
File /usr/lib/perl5/Exporter.pm
File /usr/lib/perl5/File/Basename.pm
File /usr/lib/perl5/find.pl
File /usr/lib/perl5/i386-linux/DynaLoader.pm
File /usr/lib/perl5/i386-linux/XSLoader.pm
File @EXPORT
File `x
File €FФ*юяяя8€
File ђђpгґ*
File јЋ
File ИИpгґ*
$

Я не хочу, чтобы последние несколько "файлов" попали в зависимости.
Что-то сломано?


> 
> Проблема может быть ещё в том, что некоторые блоки perl-кода
> могут исполняться сразу на этапе компиляции и повлиять на результат.
> Но с этим ничего поделать нельзя: это perl,
> There Is More Than One Way To Screw It :)
> 
> -- 
> Stay tuned,
>   MhZ                                     JID: mookid@jabber.org
> ___________
> Repartee is something we think of twenty-four hours too late.
> 		-- Mark Twain