BEGIN { open STDERR, ">", "/tmp/$0-$$.log"; }