Help for this page

Select Code to Download

Select or download this

   my $old = select OUTPUTLOG;
   $- = 0;
   select $old;