Select Code to Download

  $key_pal, $data = split ",", $line;
  $key_pal{$pal} = $data;

  $pal,$date=split ",",$line;