[Dresden-pm] Frage zum rekursiven Kopieren von Verzeichnissen

[Aristoteles Pagaltzis]

* Martin Probst <ml at megamaddin.org> [2014-12-12 17:55]:
> da war noch ein Fehler drin - die Zeile
>
> > next if($ent =~ m/^\.|\.\.$/);
>
> müsste in
>
> > next if($ent =~ m/^(?:\.|\.\.)$/);
>
> geändert werden. Sorry dafür.

Warum nicht so?

    next if $ent =~ m/^\.\.?$/;

Kürzer und klarer, nicht?

Wobei du \z statt $ willst, weil du sonst einen Bug hast.

Ich neige ja mittlerweile dazu, es stupide auszuschreiben:

    next if $ent eq '.' or $ent eq '..';

-- 
Aristoteles Pagaltzis // <http://plasmasturm.org/>