MSGID: 2:280/464.47 60a65256   
   REPLY: 3:770/100 2a9887ba   
   PID: JamNNTPd/Linux 1   
   CHRS: UTF-8 2   
   TZUTC: 0100   
   TID: CrashMail II/Linux 1.7   
   Works:   
      
   + 13:06 [2106] call to 4095:1/2@testnet   
     13:06 [2106] connected   
   + 13:06 [2106] outgoing session with localhost:24554   
   - 13:06 [2106] OPT CRAM-MD5-999cab24e1f847d0f6ffb387ad8bb2ee   
   + 13:06 [2106] Remote requests MD mode   
   - 13:06 [2106] SYS 🌺   
   - 13:06 [2106] ZYZ Oli   
   - 13:06 [2106] LOC ⛅   
   - 13:06 [2106] NDL IBNS   
   - 13:06 [2106] TIME Thu, 20 May 2021 12:06:07 +0000   
   - 13:06 [2106] VER binkd/1.1a-111/Linux binkp/1.1   
   + 13:06 [2106] addr: 4095:1/2@testnet   
   + 13:06 [2106] pwd protected session (MD5)   
   - 13:06 [2106] session in CRYPT mode   
   ? 13:06 [2106] aborted by Perl after_handshake(): Get lost!   
   + 13:06 [2106] done (to 4095:1/2@testnet, failed, S/R: 0/0 (0/0 bytes))   
      
      
   Script:   
   sub after_handshake   
   {   
       if ($sysop eq "Oli") {   
           return "Get lost!";   
       }   
       else   
       {   
           return 0   
       }   
   }   
      
      
   Shorter version:   
      
   sub after_handshake   
   {   
     return ($sysop eq "Oli" ? "Get lost!" : 0);   
   }   
      
      
   I don't code in Perl, maybe there are better ways to do it.   
      
   ---   
    * Origin: . (2:280/464.47)   
   SEEN-BY: 1/123 90/1 103/705 105/81 114/709 120/340 123/131 124/5016   
   SEEN-BY: 129/305 154/10 203/0 220/50 221/0 226/30 227/114 229/100   
   SEEN-BY: 229/101 200 424 426 550 664 700 720 1016 1017 240/5832 249/109   
   SEEN-BY: 249/110 206 307 317 280/464 5003 5555 282/1038 288/100 292/854   
   SEEN-BY: 292/8125 301/1 310/31 317/3 322/757 342/200 396/45 423/120   
   SEEN-BY: 460/58 633/280 712/848 770/1 2452/250   
   PATH: 280/464 229/101 426