XUpload - rename files to unique id

[tommy]

Hi!

I've tested xupload (Free version), and I'm really impressed!
I think I'll order the pro version, but I have one problem:

What I have to change in upload.cgi to rename _every_ file to a (really) unique id (for example: file.ext should be renamed to 2DQ4MHk8YVD28TX1)

[PilgrimX182]

It's easy hack. In upload.cgi find

Code: Select all

my ($fn,$ext) = ($1,$2);

and add below it:

Code: Select all

my @range = ('0'..'9','A'..'Z');
$fn = join '', map $range[rand($#range+1)], 1..10;
$ext='';

this will set filename as random string of 10 chars(alphanumeric,uppercase) with no extension.

[tommy]

I purchased the pro version now, and I added the code below

Code: Select all

my ($fn,$ext) = ......... 

and it works fine!
Thanks for your help!

tommy

[virtuexru]

Can you clarify which part of this needs to be changed??

Code: Select all

   my ($fn,$ext) = $filename=~/^(.+)\.(.+)$/;
   $fn=$filename unless $filename=~/\./;

   $fn = substr($fn,0,$c->{max_name_length});