$fname =~ s/^\s+(.+?)\W*$/$1/;