Hi monks, At the start of my script i convert a data file from XLSX to CSV format (comma seperated). But i have noticed that the date field is being changed ie 11/04/2004 is being returned as 11-4-04. why is this happening?

#!/usr/bin/perl
use strict;
use warnings;
use Spreadsheet::BasicRead;
use Excel::Writer::XLSX;
local $" = "'\n'";        

                            #Set-up Files

my $xlsx = ( "C:\\Temp\\NCPS_Data\\whole_school_data.xlsx"),, 1;
my @csvtemp;
my $ss   = new Spreadsheet::BasicRead($xlsx) or die;
    my $col = '';
    my $row  = 0;

    while ( my $data = $ss->getNextRow() ) {
    
        $row++;
        $col= join( ",", @$data );
            print @csvtemp,  $col . "\n" if ( $col ne "" );
    }
 __DATA__  
James Le    M    5    tttt    Y    Y    Y
James Le    M    5    11/04/2004    Y    Y
[download]