my @wetrasnfer_fix = map +(split /\./)[0], @wetransfer;