Perl: Add CHECK and INIT blocks
Perl: Add CHECK and INIT blocks

Only the Perl BEGIN and END blocks were being defined as keywords,
define CHECK and INIT blocks too. An example of a Perl program that
uses all these is:

    #!perl
    # Count to twelve in Perl
    use 5.010;

    END   { say "Twelve" }
    BEGIN { say "One"    }
    CHECK { say "Six"    }
    INIT  { say "Seven"  }
    BEGIN { say "Two"    }
    END   { say "Eleven" }
    CHECK { say "Five"   }
    INIT  { say "Eight"  }
    BEGIN { say "Three"  }
    INIT  { say "Nine"   }
    CHECK { say "Four"   }
    END   { say "Ten"    }

pygments/pygments,dscorbett/pygments,pygments/pygments,pygments/pygments,pygments/pygments,dscorbett/pygments,pygments/pygments,dscorbett/pygments,pygments/pygments,pygments/pygments,dscorbett/pygments,pygments/pygments,dscorbett/pygments,pygments/pygments,pygments/pygments,pygments/pygments,pygments/pygments,dscorbett/pygments,dscorbett/pygments,dscorbett/pygments,pygments/pygments,dscorbett/pygments,dscorbett/pygments,dscorbett/pygments,pygments/pygments,dscorbett/pygments,pygments/pygments,dscorbett/pygments,dscorbett/pygments,pygments/pygments,dscorbett/pygments,dscorbett/pygments,dscorbett/pygments,pygments/pygments,pygments/pygments,dscorbett/pygments