my ($Institution, $CourseNumber, $Professor, $Enrollment) = split '|', $try;