Help for this page
FISCAL YEAR END: 1231
for my $line (split qr/\'\n'/, $partial) {
for my $line (split qr/\n/, $partial) {
if($line=~m/\s*fiscal/mi ) {print $line."\n";}