@fieldnames = split(/,/, $fnames);