#!/usr/bin/perl

my $v = `PYTHONPATH=. scripts/fastaq version`;

while(<>) {
	chomp;
	my ($name, $desc) = split(/\s{2,}/);
	my $uname = uc($name);
	`PYTHONPATH=. help2man -N -o ./debian/man/fastaq-$name.1 -n '$desc' --version-string='$v' 'scripts/fastaq $name'`;
	`sed -i 's/.TH FASTAQ /.TH FASTAQ-$uname /' debian/man/fastaq-$name.1`;
	`sed -i 's/fastaq $name/fastaq_$name/' debian/man/fastaq-$name.1`;
}