my $string = 'osSE5Gu0Vi8WRq93UvkYZCjaOKeNJfTyH6tzDQbxFm4M1ndXIPh27wBA rLclpg| 3 35 27 62 51 27 46 57 26 10 46 63 57 45 15 43 53';

my ( $first, $second ) = split ( "\|", $string );
say "first:", $first;
say "second:", $second;

output:
first:o
second:s