Help for this page

Select Code to Download

Select or download this

my $newstring = substr($string, 4, 2)   # Month (was at 4 len 2)
              . substr($string, 6, 2)   # Day   (was at 6 len 2)
              . substr($string, 0, 4);  # Year  (was at 0 len 4)

Select or download this

my $newstring = substr($string, 4, 4)   # M+D  (was at 4 len 4)
              . substr($string, 0, 4);  # Year (was at 0 len 4)