>perl -wMstrict -le "my $ma = '525400eb8b36'; $ma =~ s/..\K\B/:/g; print qq{'$ma'}; " '52:54:00:eb:8b:36'