my @split_line = split(m"\|",$line)