for($i = 0; $i < $n; $i++) {
  &foobar($arr[$i]);
}

##</code><code>##

#! /usr/bin/perl -w

use struct;

##</code><code>##

#! /usr/bin/perl -w

typedef struct;