It wouldn't be the Monestary without a regexp solution:

$a = "19600326";
$a =~ s/(\d{4})(\d{2})(\d{2})/$1-$2-$3/;
print "$a\n";
[download]

rdfield