splice(@fields, 15, 1, 
    split(//, $fields[15]));