$joke = $knockknocks{(keys %knockknocks)[rand keys %knockknocks]};