Select Code to Download

#!/usr/bin/perl
use strict;
...
          '2199770049,,20170428154818,20170527235959; 70049,,201704281
+54818,20170527235959 70070,,20170428154739,20170527235959|||',
          '2199870049,,20170428154818,20170527235959; 70049,,201704281
+54818,20170527235959 70070,,20170428154739,20170527235959 70071,,2017
+0428154739,20170527235959|||'
        ];

#!/usr/bin/perl
use strict;
...
          '21997|||70049,,20170428154818,20170527235959; 70070,,201704
+28154739,20170527235959|||',
          '21998|||70049,,20170428154818,20170527235959; 70070,,201704
+28154739,20170527235959 70071,,20170428154739,20170527235959|||'
        ];