my ($zip, $amt, $date, $candid) = split;