Select Code to Download

use strict;
use DBI;
...
    open STDERR, ">&OLDERR";
    \$output;
}

2012.12.18 12:47:31 aardvark@bulldog:~/pg_stuff/pg_sql/pgsql.HEAD [0]
$ perl vacuum.pl
...
INFO:  analyzing "public.t"
INFO:  "t": scanned 0 of 0 pages, containing 0 live rows and 0 dead ro
+ws; 0 rows in sample, 0 estimated total rows
----------------------------------------------------------------------