#!/usr/bin/perl -w
use strict;

my @buffer = ();
while (<>) {
	if (m/^Package: /) {
		@buffer = ($_);
		do {
			$_=<>;
			@buffer = (@buffer,$_);
		} until (m/^Maintainer:/);
		$_=<>;
		if (!m/^Depends:.*xlib/) {
			print @buffer;
			do {
				print $_;
				$_=<>;
			} while (!m/^installed-size:/);
			print $_,"\n";
		}
	}
}
