[% USE df = DateTime::Format('DateTime::Format::Strptime', { pattern => '%FT%T', locale => 'en_US', time_zone => 'GMT' }) -%] [% USE Dumper -%] [% docs=changed.nsortf('last_change') -%] [% tag='';IF (matches = path.match('^(?:.*/)?tags/(.*)$')); tag = matches.0; END -%] tag:thenautilus.net,2009-08-18:tags/[% tag %]/feed.[% language %].xml [% l=docs.last;df.format(changed.$l.last_change) %]Z [% FOR doc IN docs; NEXT UNLESS isLang(language,doc) -%] [% IF tag; doc_duxml=typedAs(doc,'du.xml'); IF tagged.$tag.grep(doc_duxml).size == 0; # bad regex... NEXT; END; END -%] [% IF changed.$doc.creation %][% df.format(changed.$doc.creation) %]Z[% END %] [% IF changed.$doc.last_change %][% df.format(changed.$doc.last_change) %]Z[% END %] tag:thenautilus.net,2009-08-18:[% atomIdFor(language,filename,dstUriFor(doc,filename)) %] [% dstUriFor(doc,filename) %] [% END -%]