Re: Bug#465783: perl: ExtUtils::Install upgrade in Perl 5.10 breaks too many packages

[Brendan O'Dea <bod@debian.org>]

On Fri, Feb 15, 2008 at 09:39:42AM +0100, Raphael Hertzog wrote:
>On Thu, 14 Feb 2008, Niko Tyni wrote:
>> I run a few greps on debian/rules of the source packages of all the
>> binary packages matching '-perl' in unstable. Results: at least 398
>> arch:all and 38 arch:any packages apparently do an unconditional rmdir
>> for the empty directory.
>
>I tend to disagree. The number are big but the fix is easy. I'd suggest
>to work with Lucas to do a full rebuild with perl 5.10 and submit those
>400 bugs right now with severity important. Also usertag them to be able
>to follow the evolution.

I'm keen to get 5.10 into Lenny, since the length of our stable release
cycles otherwise means that we'll be stuck with 5.8 for quite a while.

My initial thought was to set up a staging area, although was told that
with the binNMU mechanism it should no longer be necessary...  This
issue with rmdir however would appear to have torpedoed that plan.

Given the mechanical nature of the fix required, I am still inclined to
uploading to unstable before the soft freeze in a week or so.  Remember,
it's called "unstable" for a reason, people.

--bod

#!/usr/bin/perl -lp
if (m!^\s+(@\s*)?rmdir(\s+(--parents|--ignore-fail-on-non-empty|-p))*((\s+\S+/(lib|share)/perl5)+)\s*$!)
{
  $_ = join "\n",
       map "\t[ ! -d $_ ] || rmdir --ignore-fail-on-non-empty --parents --verbose $_",
       split ' ', $4;
}