(my $first, $second) = split/\|/;