Perl + LevelDB Picture Stocker