View Single Post
  #13  
Old 01-14-2013, 10:43 PM
c0ncrete's Avatar
c0ncrete
Dragon
 
Join Date: Dec 2009
Posts: 719
Default

Code:
package Noport::Response;

use 5.012;
use constant ONLINE => 1;

sub RandomThing {
    rand 99 > 49 ? 'try ' . UnrelatedOpcode() : 'incoherent nonsense';
}

sub UnrelatedOpcode {
    '0x' . join '', map { unpack "H*", chr rand 256 } 1 .. 2;
}

say RandomThing() while ONLINE;
Reply With Quote