If you don't want trailing empty values stripped, then use split '\|', $line, -1; as documented at split.