Select Code to Download

void printit() {
  int i;
...
    printf("%d ",res_a[i]);
  printf("\n");
}

$perl test.pl | wc
     46    2859    8192

$ perl test.pl | wc
    113    7164   20480

void printit() {
  Inline_Stack_Vars;
...
sub printme {
  print for $_[0];
}