abienert

input {
  redis {
    data_type => "list"
    host => "mobile-redis-cache.gfgrht.0001.apse2.cache.amazonaws.com"
    port => 6379
    key => "job-apply-api"
  }
}
 
output {

abienert

<link rel="import" href="../core-drawer-panel/core-drawer-panel.html">
<link rel="import" href="../paper-button/paper-button.html">
<link rel="import" href="../paper-checkbox/paper-checkbox.html">

<polymer-element name="my-element">

  <template>
    <style>    
      :host {
        position: absolute;

abienert

open System
open System.Collections.Generic
open System.Text.RegularExpressions

let rec addWordTo newCorpus corpus word =
    match corpus with
        | [] -> 
            match word with
                | None -> newCorpus
                | Some(value) -> newCorpus @ [value]

abienert

open System
open System.Threading

// Operator overload for the post message.
let (<!) (proc : MailboxProcessor<_>) msg = proc.Post(msg) 

// Helpers
let thread_id = (fun () -> System.Threading.Thread.CurrentThread.ManagedThreadId)
let start f = MailboxProcessor.Start f