#!/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])/$3-$1-$2/' "${i}"
done