BEGIN{
    open(STDOUT,">stdout.log")||die"$!";
}