Prototype of file storage on Perl and Redis