Pseudocoded

 
$person->checkPokerDB( 'http://pokerdb.thehendonmob.com/' );
 
if ( $person->prizeMoney > 0 )
    return false;
 
 
$person->searchForbes( 'http://www.forbes.com/lists/' );
 
if ( $person->ForbesRank > 0 )
    return true;
 
 
$person->testARSE( 'http://electricpulp.com/guykawasaki/arse/' );
 
if ( $person->ARSEScore > 15 )
    return false;