XML de Perl :: Twig vem com ...
xml_grep --nowrap --text_only /statuses/status/text
Em XML :: XPath você pode fazer:
perl -MXML::XPath -E 'my $xp = XML::XPath->new(ioref => \*STDIN); say $xp->getNodeText("/statuses/status/text");'
ou
perl -MXML::XPath -E 'my $xp = XML::XPath->new(ioref => \*STDIN); for my $node ($xp->find("/statuses/status/text")->get_nodelist) { say $node->string_value; }'
(Claro, há Net :: Twitter também .)