- or download this
file-rename 's/^[^.]+\.//; s/\.[^.]+$//' ...
- or download this
file-rename 's/^/sprintf "%02d. ", $NR/' ...
- or download this
file-rename -Tutf8 '$_ = ucfirst' -f ...
- or download this
file-rename 's/^/old-/' -N ../*
- or download this
file-rename --rename=rotate-left file1 file2 file3 file4
- or download this
file-rename --rename=rotate-right file1 file2 file3 file4
- or download this
file-rename --rename=swap file1 file2 file3 file4
- or download this
file-rename --rename=flip file1 file2 file3 file4
- or download this
#!/usr/bin/env perl
...
# ====================================================================
+=====
# EOF