if (s/(\w+shar\d\d\d\d\d\d\.\d\d\d\d)/$1/)