why you should document things, no matter how small.

[waider]

Waider (mayo.dev.ie.alphyra.com) $ > cat gnee
1109 find . -type f | perl -ne ‘while(<>) { chop; $f=$_; $f=~s|^./([^/]+)/|$1:|; $f=~s|/([^/]+)$|.\U$1|; $f=~s/\//-/g; system(“mv $_ $f\n”)}’
Waider (mayo.dev.ie.alphyra.com) $ >
Um. Yes. Looks like it might uppercase filenames and do something like replacing slashes with dashes, but I’m certainly not running it to find out.

Comments

[waider.livejournal.com]

Thanks, Matt. The next time I need a critique (that completely misses the point I was making) of a one-liner from six years ago, I'll be sure and contact you directly.

[sambushell.livejournal.com]

Schmeh. You complain about perl readability, you get what you get.