Random filenames or shorten it

[_pi]

can you give me an example on how to create a random filename and shorten it
from a file ?

like 'super documentation about super scripting.pdf'
to
'scrdocsup.pdf'

thanks.

[Gintaras]

Maybe tokenize it using tok, get 3 chars from each word, and join.

Code:

Copy      Help

str s="super documentation about super scripting.pdf"
str name.getfilename(s) ext=s+name.len
ARRAY(str) a; int i; str ss
if(tok(name a)>1)
,for(i 0 a.len)
,,str& r=a[i]
,,if(r.len>3) r.fix(3); r.rtrim("aeiyou"); r[0]=toupper(r[0])
,,ss+r
,ss+ext
else ss=s
out ss

[_pi]

perfect !
thanks once again.

[_pi]

i have to confess that i don't understand exactly how it works.
why is test.pdf returning no filename ?

[Gintaras]

if(tok(name a)>1)

I changed the code, now works well.

[_pi]

Code:

Copy      Help

str s="super5.pdf"
str name.getfilename(s) ext=s+name.len
ARRAY(str) a; int i; str ss
if(tok(name a)>1)
,for(i 0 a.len)
,,str& r=a[i]
,,if(r.len>3) r.fix(3); r.rtrim("aeiyou"); r[0]=toupper(r[0])
,,ss+r
,ss+ext
else ss=s
out ss

returns super5.pdf

no scamble ...