Perl utility to Analyse Bird Survey Data