my @wetrasnfer_fix = map /([0-9]*_[0-9]*)/, @wetransfer;

##</code><code>##

my @wetrasnfer_fix = map s/\.tif$//r, @wetransfer;

##</code><code>##

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