Help for this page

Select Code to Download


  1. or download this
    my $reload_config = 0;
    $SIG{USR1} = sub { $reload_config = 1 };
    ...
        $reload_config = 0;
      }
    }
    
  2. or download this
    speed 38400 baud; rows 30; columns 80; line = 0;
    intr = ^C; quit = ^\; erase = ^?; kill = ^U; eof = ^D; eol = <undef>;
    eol2 = <undef>; start = ^Q; stop = ^S; susp = ^Z; rprnt = ^R; werase =
    + ^W;
    ...