$_ = 'filename.12345Gif';
s/^(\.*\.).*(...)$/$1$2/s;
print;