Perl Fehler constant item in my

Question

Wenn ich diesen Code ausführe

sub greet {
    # my $name = shift;
    # oder
    my (name, t) = @_;
    print "Hello, $name, $t!\n";
}

greet("Alice", "A");
greet("Bob", "B");

kommt die Fehlermeldung "constant item in my".

Answer 1

Der Fehler ist in der Zeile

my (name, t) = @_;

Es sollte so aussehen

my ($name, $t) = @_;