Perl redis shell David Leadbeater <dgl@dgl.cx>