Re: Perl help needed for kernel-package mod ... (Was: Bringing the 2.6.13 (and beyond) kernel to sid, solving ramdisk generations issues and stuff.)

[Mattia Dongili <malattia@linux.it>]

On Sun, Oct 16, 2005 at 12:53:13PM +0200, Sven Luther wrote:
> On Sun, Oct 16, 2005 at 12:35:29PM +0200, Mattia Dongili wrote:
> > # slurp the ramdisk option if present or default 'initramfs' for kernels
> > # prior 2.6.13 or default to 'mkinitrd' if none of the previous apply
> > my $ramdiskopts = (/ramdisk\s*=\s*(.+)/ig ? "$1" : 
> >                         (system("dpkg --compare-versions $unamedashr lt 2.6.13 1>/dev/null 2>&1") == 0 ?
> >                                 "/usr/sbin/initramfs" : "/usr/sbin/mkinitrd"));
> 
> Oh, and btw, it should be mkinitramfs for >= 2.6.13, and mkinitrd in other
> cases, so i need a ge instead of lt, right ? 

Ah, yes. sorry. Or you could swap 
	"/usr/sbin/mkinitrd" : "/usr/sbin/initramfs"

-- 
mattia
:wq!