Nginx config, как?

http {

    perl_require myhandler.pm;

    ...

    server {

        ...

        location ~* /original/\.(gif|jpg|png)$ {

            perl  myhandler::handler;

        }

    }

}

package myhandler;

use nginx;

use Digest::MD5 qw(md5_hex);



sub handler {

  my $r = shift;

  if ($r->filename=~m|/original/(.*?)\.(jpg|gif|png)|) {

      my $id_md5=md5_hex($1);

      my $filename="/original/".substr($id_md5,31,1)."/".substr($id_md5,0,2)."/".substr($id_md5,2,2).".".$2;

      $r->sendfile($filename);

  }

  return OK;

}

 

1;

__END__