#!/usr/bin/perl
print "Content-type:text/html\n\n";
print '';
print '';
print 'Antal exoplaneter';
print '';
print '';
$DATE=`date "+%e %b %Y"`;
#$NUM=`wget --output-document=- http://www.exoplanet.eu/ 2> /dev/null | grep 'update : ' | head -1 | awk '{print substr($0,index($0,'(')+1,4)}'`;
$NUM_EXOPLANETS=4102;
printf ' %s:%10d
',$DATE,$NUM_EXOPLANETS;
print '';
print '';
;