<%init>
use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;

my $response = $ua->get('http://game.hub.my/review/iphone-games/');

if ($response->is_success) {
	my $page = $response->decoded_content;
	my $chart = `cat /usr/local/apache/htdocs/gamehub/app/test.html`;
	$page =~ s/<XXX>/$chart/;
	print $page;
}
</%init>