sub foo1 { my ($command) = @_; # @_ bleibt unverändert }
sub foo2 { my $command = $_[0]; # @_ bleibt unverändert }
sub foo3 { my $command = shift; # @_ wird geändert }