Author: buildbot
Date: Thu Aug 25 06:48:59 2011
New Revision: 794898

Log:
Staging update by buildbot

Added:
    websites/staging/openejb/trunk/content/dyn/
    websites/staging/openejb/trunk/content/dyn/latest.cgi   (with props)

Added: websites/staging/openejb/trunk/content/dyn/latest.cgi
==============================================================================
--- websites/staging/openejb/trunk/content/dyn/latest.cgi (added)
+++ websites/staging/openejb/trunk/content/dyn/latest.cgi Thu Aug 25 06:48:59 
2011
@@ -0,0 +1,19 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use LWP;
+
+my $ua = LWP::UserAgent->new();
+
+my $content = 
$ua->get("https://repository.apache.org/content/groups/snapshots/org/apache/openejb/apache-tomee/4.0.0-SNAPSHOT/";)->content;
+
+$content = join(" ", split("[ \r\n]+", $content));
+$content =~ s/(<tr>)/\n$1/g;
+$content =~ s,(</tr>),$1\n,g;
+
+foreach my $line (split("\n", $content)) {
+    next if $line =~ /\.(sha1|md5|jar|pom|xml)|Parent/;
+    print $line . "\n";
+}

Propchange: websites/staging/openejb/trunk/content/dyn/latest.cgi
------------------------------------------------------------------------------
    svn:executable = *


Reply via email to