uninitialized value in $1 Variable nach Regulärem Ausdruck

[Struppi]

my $test="HUMAN            ----EERTLPMLTSACPGWVRYAERVLGRPITAHLCTAKSPQQVMGSLVKDYFARQQ---";
$test=~/(\w*)\s{4,}(\w*)\n/;

du suchst ein Ergebnis vor einem Zeilenumbruch, der ist aber in deinem String nicht drin.

Struppi.