in reply to Date::Manip and date

Hi, I've the following within an Perl script which reads an csv file for the input the date within the csv file is yyyy-mm-dd

$begindate = @fields13; my @begindate_fields = split"-", $begindate; + $enddate = @fields14; my @enddate_fields = split"-", $enddate; $norm +alized_begindate = @begindate_fields2."/".@begindate_fields1."/".@beg +indate_fields[0]; $normalized_enddate = @enddate_fields2."/".@enddate +_fields1."/".@enddate_fields[0]; $begindate_seconds = UnixDate( Parse +Date($normalized_begindate." 00:00:00"), "%s" ); $enddate_seconds = U +nixDate( ParseDate($normalized_enddate." 00:00:00"), "%s" );

The dates form the csv file have to be convert to epoch. It read the begin date and convert it, but it does not convert the end date. Also if the begin date within the csv file is for example 1988-12-13 it does not convert it. If the begin date is for example 1988-10-10 then it converts. So two issue to solve :)

2019-01-19 Athanasius fixed code wrapping

Replies are listed 'Best First'.
Re^2: Date::Manip and date
by 1nickt (Canon) on Jul 09, 2015 at 10:14 UTC

    Thanks for trying to clean up your post. All the code is on one line! I've inserted some new-lines :)

    It's not clear what you are trying to do: please post your input data, what you would like to get as output data, and what your code outputs now. And show where your original date comes from ...

    $begindate = @fields13; my @begindate_fields = split"-", $begindate; $enddate = @fields14; my @enddate_fields = split"-", $enddate; $normalized_begindate = @begindate_fields2."/".@begindate_fields1."/". +@begindate_fields[0]; $normalized_enddate = @enddate_fields2."/".@enddate_fields1."/".@endda +te_fields[0]; $begindate_seconds = UnixDate( ParseDate($normalized_begindate." 00:00 +:00"), "%s" ); $enddate_seconds = UnixDate( ParseDate($normalized_enddate." 00:00:00" +), "%s" );
    Remember: Ne dederis in spiritu molere illegitimi!

      Input data, the csav file

      ABC;1234;6789;Appel and;1234;111;23456;1988-10-20;2015-12-31;1;Compan;000;1;1988-12-13;2015-12-30;123456 ABC;1234;6789;Orange and .;1234;11;23456;1969-01-01;2015-12-31;1;Com;000;1;1988-10-10;2015-12-30;654321

      Output data now

      123456#000###5244319620#Compan 654321#000#592437600##5244319620#Orange and