Encontrar claves que no caducan en Redis

Modificado de un sitio que no puedo encontrar ahora.

redis-cli keys  "*" | while read LINE ; do TTL=`redis-cli ttl "$LINE"`; if [ $TTL -eq  -1 ]; then echo "$LINE"; fi; done;

editar:Tenga en cuenta que esta es una llamada de bloqueo.