my ($year,$month,$day) = unpack 'a4 x1 a2 a2', $date_cfg;
my $new_date = "$month/$day/$year";