use Template_Engine;
use LWP::Simple;

my $template=Template_Engine->new();
$template->add_template( Parse_Datum => eval{local $/=undef; <DATA>} );

$template->signal_connect('Datum' => &datum, 'optionale Werte an die Funktion');

$template->parse( Parse_Datum => get('http://example.org') );

sub datum
{
  my $wert=shift;
  my @path=@{shift};
  my $opts=shift;

  print "@path => $wert\n";

  return 1;
}

__DATA__
[%foreach%]
  <div id="tag">
  [%...%]
  [%foreach%]
    [%...%]
    <div class="datum">[%value path='/Tag/Datum'%]</div>
    [%...%]
  [%endfor%]
  [%...%]
  </div>
[%endfor%]