@jpgs = glob("/path/to/images/*.jpg");

@big_jpgs = grep { -s $_ > 100000 } glob("/images/*.jpg");
[download]

Text::Template and Template::Toolkit are general purpose templating systems. If your requirements are modest you can always just use an RE

my $template = get_template();
$template =~ s/<%token%>/$token_value/g;
[download]

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print