Try setting the record separator $/ to ";" or adding the number of records in @arr to $ct.
In reply to Re: Count of split data by Joost in thread Count of split data by Anonymous Monk