$fname =~ s/(?:$extra)//;