Get numbers from string

[DuanJinHui]

Hi friend

How get numbers from string?

eg:Agl-7.s0@2e:3?(#)8_5F

result:702385

 

and,How get letters from string?

result:AGLSEF

 

Thanks for any help!

[Tharwat]

This is to parse numbers only .

 

(vl-list->string
 (vl-remove-if-not
   '(lambda (i) (< 47 i 58))
   (vl-string->list "Agl-7.s0@2e:3?(#)8_5F")
 )
)

 

Letters only .

 

(vl-list->string
 (vl-remove-if-not
   '(lambda (a) (or (< 96 a 123) (< 64 a 91)))
   (vl-string->list "Agl-7.s0@2e:3?(#)8_5F")
 )
)

[DuanJinHui]

This is to parse numbers only .

 

(vl-list->string
 (vl-remove-if-not
   '(lambda (i) (< 47 i 58))
   (vl-string->list "Agl-7.s0@2e:3?(#)8_5F")
 )
)

 

Letters only .

 

(vl-list->string
 (vl-remove-if-not
   '(lambda (a) (or (< 96 a 123) (< 64 a 91)))
   (vl-string->list "Agl-7.s0@2e:3?(#)8_5F")
 )
)

 

Thank you very much . Tharwat

[Tharwat]

Thank you very much . Tharwat

You are most welcome.