According to the pod, the get_tag method returns an array reference, with the text as the last element of the array. You can get that by saying,

my $text = $stream->get_tag("ul")->[-1];
[download]