my $num_lines = 0;
    my $num_chars = 0;
 
%%
\n      ++$num_lines; ++$num_chars;
.       ++num_chars;
 
%%

sub main {
  yylex();
  printf( "# of lines = %d, # of chars = %d\n",
                           $num_lines, $num_chars );
}