/*** Definition Section has one variable 
which can be accessed inside yylex()  
and main() ***/
%{ 
int count = 0; 
%} 
 
/*** Rule Section has three rules, first rule  
matches with capital letters, second rule 
matches with any character except newline and  
third rule does not take input after the enter***/
%% 
[A-Z] {printf("%s capital letter\n", yytext); 
       count++;} 
.     {printf("%s not a capital letter\n", yytext);} 
\n    {return 0;} 
%% 
 
/*** Code Section prints the number of 
capital letter present in the given input***/
int yywrap(){} 
int main(){ 
 
// Explanation: 
// yywrap() - wraps the above rule section 
/* yyin - takes the file pointer  
          which contains the input*/
/* yylex() - this is the main flex function 
          which runs the Rule Section*/
// yytext is the text in the buffer 
 
// Uncomment the lines below  
// to take input from file 
// FILE *fp; 
// char filename[50]; 
// printf("Enter the filename: \n"); 
// scanf("%s",filename); 
// fp = fopen(filename,"r"); 
// yyin = fp; 
 
yylex(); 
printf("\nNumber of Captial letters " 
      "in the given input - %d\n", count); 
 
return 0; 
} 
 

LyoqKiBEZWZpbml0aW9uIFNlY3Rpb24gaGFzIG9uZSB2YXJpYWJsZSAKd2hpY2ggY2FuIGJlIGFjY2Vzc2VkIGluc2lkZSB5eWxleCgpICAKYW5kIG1haW4oKSAqKiovCiV7IAppbnQgY291bnQgPSAwOyAKJX0gCiAgCi8qKiogUnVsZSBTZWN0aW9uIGhhcyB0aHJlZSBydWxlcywgZmlyc3QgcnVsZSAgCm1hdGNoZXMgd2l0aCBjYXBpdGFsIGxldHRlcnMsIHNlY29uZCBydWxlIAptYXRjaGVzIHdpdGggYW55IGNoYXJhY3RlciBleGNlcHQgbmV3bGluZSBhbmQgIAp0aGlyZCBydWxlIGRvZXMgbm90IHRha2UgaW5wdXQgYWZ0ZXIgdGhlIGVudGVyKioqLwolJSAKW0EtWl0ge3ByaW50ZigiJXMgY2FwaXRhbCBsZXR0ZXJcbiIsIHl5dGV4dCk7IAogICAgICAgY291bnQrKzt9IAouICAgICB7cHJpbnRmKCIlcyBub3QgYSBjYXBpdGFsIGxldHRlclxuIiwgeXl0ZXh0KTt9IApcbiAgICB7cmV0dXJuIDA7fSAKJSUgCiAgCi8qKiogQ29kZSBTZWN0aW9uIHByaW50cyB0aGUgbnVtYmVyIG9mIApjYXBpdGFsIGxldHRlciBwcmVzZW50IGluIHRoZSBnaXZlbiBpbnB1dCoqKi8KaW50IHl5d3JhcCgpe30gCmludCBtYWluKCl7IAogIAovLyBFeHBsYW5hdGlvbjogCi8vIHl5d3JhcCgpIC0gd3JhcHMgdGhlIGFib3ZlIHJ1bGUgc2VjdGlvbiAKLyogeXlpbiAtIHRha2VzIHRoZSBmaWxlIHBvaW50ZXIgIAogICAgICAgICAgd2hpY2ggY29udGFpbnMgdGhlIGlucHV0Ki8KLyogeXlsZXgoKSAtIHRoaXMgaXMgdGhlIG1haW4gZmxleCBmdW5jdGlvbiAKICAgICAgICAgIHdoaWNoIHJ1bnMgdGhlIFJ1bGUgU2VjdGlvbiovCi8vIHl5dGV4dCBpcyB0aGUgdGV4dCBpbiB0aGUgYnVmZmVyIAogIAovLyBVbmNvbW1lbnQgdGhlIGxpbmVzIGJlbG93ICAKLy8gdG8gdGFrZSBpbnB1dCBmcm9tIGZpbGUgCi8vIEZJTEUgKmZwOyAKLy8gY2hhciBmaWxlbmFtZVs1MF07IAovLyBwcmludGYoIkVudGVyIHRoZSBmaWxlbmFtZTogXG4iKTsgCi8vIHNjYW5mKCIlcyIsZmlsZW5hbWUpOyAKLy8gZnAgPSBmb3BlbihmaWxlbmFtZSwiciIpOyAKLy8geXlpbiA9IGZwOyAKICAKeXlsZXgoKTsgCnByaW50ZigiXG5OdW1iZXIgb2YgQ2FwdGlhbCBsZXR0ZXJzICIgCiAgICAgICJpbiB0aGUgZ2l2ZW4gaW5wdXQgLSAlZFxuIiwgY291bnQpOyAKICAKcmV0dXJuIDA7IAp9IAo=