if ( not length $message->as_string
  or $message->as_string =~ /\A\s*\z/ )
{
    cluck "$in_filepath: Invalid message";
    next;
}