$dom->F(
  '//what:ever', 
   'what' => 'urn:yeahwhatever',
   'that' => 'urn:thatalso',
)->[0]->F('//what:else/that:there');

sub XML::LibXML::Node::F {
    my $self   = shift;
    my $xpath  = shift;
    my %prefix = @_;
    our $XPATHCONTEXT;
    $XPATHCONTEXT ||= XML::LibXML::XPathContext->new();
    while( my( $p, $u ) = each %prefix ){
        $XPATHCONTEXT->registerNs( $p, $u );
    }
    $XPATHCONTEXT->findnodes( $xpath, $self );
}