mandesk2f

#!/usr/bin/perl
use Getopt::Long;
my $manpage = qq(man);
GetOptions("page=s"=>\$manpage);
system(qq(man -Tps $manpage | ps2pdf - /tmp/$manpage.pdf));
system(qq(pdfnup /tmp/$manpage.pdf));
system(qq(rm /tmp/$manpage.pdf));
system(qq(mv /tmp/$manpage-2x1.pdf ~/Desktop/$manpage.pdf));

# mandesk2f -p DBD::Oracle
# will make a 2 fold pdf on your desk