Working on functions- to insert _ for every letter in a word

[meena_gowtham]

Hello, 

Kindly help me with this task.

I do have a variable with value 'GLOBAL INDIA'

Here, I want to insert '_' for every letter

Output I need: G_L_O_B_A_L  I_N_D_I_A

[Patrick]

Strange requirement. Below will work as long as you are not dealing with characters that use more than one byte (because the SAS RegEx functions are not - yet? - built for this).

data test;
  var='GLOBAL INDIA';

  /* define length for new variable doubled the source variable */
  if 0 then var_new=var||var;

  var_new=prxchange('s/([^ ])(?!\b)/$1_/oi',-1,strip(var));
run; 

[andreas_lds]

Looks like homework, what have you tried so far?

Your wanted output does not match the description, there is no underscore after the final A.

If this is type, using a regular expression is my first choice.

[Ksharp]

data test;
var='GLOBAL INDIA';

var_new=prxchange('s/(\w)(?=\w)/$1_/o',-1,strip(var));
run;