Help for this page
if($line=~m/\s+(January|Febuary|March|April|May|June|July|August|Septe +mber|October|November|December\s+\d+,\s+\d+)/i) {$res->{fiscal +_year_ended} =$1;}