[BACK]Return to pta.pl CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / pta

Diff for /pta/pta.pl between version 1.5 and 1.6

version 1.5, 2020/10/20 10:25:47 version 1.6, 2020/11/10 19:08:06
Line 230  while (<$in>) {
Line 230  while (<$in>) {
   
         s/^(\d{4})(\d{2})(\d{2}) +// or die "$fn date parse error: $line";          s/^(\d{4})(\d{2})(\d{2}) +// or die "$fn date parse error: $line";
         my ($year, $month, $day) = ($1, $2, $3);          my ($year, $month, $day) = ($1, $2, $3);
         s/^([A-Z]+(?:\d+\/\d+)?) +// or die "$fn ID parse error: $line";          s/^(\S+) +// or die "$fn ID parse error: $line";
         my $id = $1;          my $id = $1;
         s/^(\d+) +// or die "$fn debit account number parse error: $line";          s/^(\d+) +// or die "$fn debit account number parse error: $line";
         my $debit = $1;          my $debit = $1;

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

CVSweb