extension (io: IO.type)
  def state[A](initial: A): Resource[IO, SignallingRef[IO, A]] =
    SignallingRef[IO].of[A](initial).toResource

SignallingRef[IO].of("world").toResource.flatMap { name =>
   div(
      label("Your name: "),
      input.withSelf { self =>
        (
          placeholder := "Enter your name here",
          onInput --> (_.foreach(_ => self.value.get.flatMap(name.set)))
        )
      },
      span(" Hello, ", name.map(_.toUpperCase))
    )
}

IO.state("world").flatMap { name =>
    div(
      label("Your name: "),
      input.withSelf { self =>
        (
          placeholder := "Enter your name here",
          onInput --> (_.foreach(_ => self.value.get.flatMap(name.set)))
        )
      },
      span(" Hello, ", name.map(_.toUpperCase))
    )
}