1 2 3 4 5
#!/usr/bin/env bash for i in "$@"; do perl-rename 's/([0-9][0-9][0-9][0-9])([0-9][0-9])([0-9][0-9])/$1-$2-$3/' "${i}" done