Help for this page

Select Code to Download


  1. or download this
        # Convert the decimal to hexadecimal and pad the result with a lea
    +ding
        # zero if needed.
        my $hex = sprintf("%x", $dec);
        $hex = length( $hex ) == 1 ? "0".$hex : $hex;
    
  2. or download this
        my $hex = sprintf '%02x', $dec;
    
  3. or download this
    sub basicSNTPSetup {
      ...   
    ...
        ..
      };
    };
    
  4. or download this
    sub basicSNTPSetup {
      ...   
    ...
    sub keyDifference {
      ..
    };
    
  5. or download this
    my $verify_port = sub {
      my $port = shift;
    ...
      }
      return TRUE;
    };
    
  6. or download this
    sub verify_port {
      ...
    };
    
  7. or download this
      if ( $port >= MIN_UDP_PORT || $port <= MAX_UDP_PORT ) {
    
  8. or download this
    either:
      if ( ($port >= MIN_UDP_PORT) && ($port <= MAX_UDP_PORT) ) {
    or:
      if ( $port >= MIN_UDP_PORT and $port <= MAX_UDP_PORT ) {