Wert aus einer Schleife heraus ändern?

[Christian Kruse]

Hallo Struppi,

sub trim
{
$_[0] =~ s/^\s+//;
$_[0] =~ s/\s+$//;
$_[0];
}

Wah! Böse Falle, ganz böse Falle.

sub trim {
  my $val = shift;

$val =~ s/^\s+//;
  $val =~ s/\s+$//;

return $val;
}

@_ enthält automagische Referenzen auf die Orginal-Variable. Niemals @_ direkt bearbeiten,
es sei denn, man hat es *deutlichst* dokumentiert.

Grüße,
 CK