my $data = '19600326';

print join('-', unpack('A4A2A2', $data));