my $data = {
    employee => [
                    { name => 'Foo'  },
                    { name => 'Bar'  },
                    { name => 'Baz'  },
                ]
};

my $template = Template->new();
$template->process(\*DATA, $data)
    || die "Template process failed: ", $template->error(), "\n";

__DATA__
[% FOREACH person IN employee %]
    [%- IF loop.index() %][% loop.size()>2 && loop.last() ? ' or':',' %] [% END %]
    [%- person.name %]
[%- END %].

##</code><code>##

Foo, Bar or Baz.