$feld1 =~ /^ (! .! ) */;
$feld1 = $1;
Was meinst Du, welche Bedeutung das Ausrufezeichen in einer RE hat?
Was meint die Perl-Doku, welche Bedeutung das Ausrufezeichen in einer RE hat?
Ersetze die Leerzeichen am Anfang durch \*gar nichts\*, ersetze die Leerzeichen am Ende durch \*gar nichts\*. Das ist wesentlich einfacher zu formulieren und birgt nicht das Risiko, das $feld1 undefiniert wird wie in Deinem Code.
Alexander