uninitialized value in $1 Variable nach Regulärem Ausdruck

[Schnaps]

Servus

Ich wundere mich über eine Fehlermeldung hier,
die Zeilen wo ich mir das $1 und $2 ausgeben lassen will produzieren eine Fehlermeldung.

Aber warum, ich arbeite mit use strict;

my $test="HUMAN            ----EERTLPMLTSACPGWVRYAERVLGRPITAHLCTAKSPQQVMGSLVKDYFARQQ---";
$test=~/(\w*)\s{4,}(\w*)\n/;
#%alignment= ( $1 => $2);
print $1;
print "\n\n\n\n";
print $2;

Wo liegt hier das Problem?