I have seen code but all require me to use Php.

What code?

I have found this piece of code in a blog http://blogs.coldbuffer.com/how-to-get-facebook-fan-count I would like to do the same in perl

?php

require_once('facebook.php');

$facebook = new Facebook(array( 'appId' => 'your_app_id', 'secret' => 'your_app_secret', 'cookie' => true, ));

$result = $facebook->api(array( 'method' => 'fql.query', 'query' => 'select fan_count from page where page_id = your_page_id;' ));

$fb_fans = $result[0]'fan_count';

?>

Facebook

OP revised post without notice; has been childed for doing so. AM's answer was directly responsive to OP's original content.