diff options
| author | Björn Stenberg <bjorn@haxx.se> | 2007-01-08 23:52:01 +0000 |
|---|---|---|
| committer | Björn Stenberg <bjorn@haxx.se> | 2007-01-08 23:52:01 +0000 |
| commit | 6d4c19707ef95942e323cbdc89fbbfdbe45e7cc5 (patch) | |
| tree | d11bbebc69df06d60970d05b4816e13d93602f2d /www/getbugs.pl | |
| parent | 8cece5a745f30234bfced4becfd9dfe4ca1047d4 (diff) | |
| download | rockbox-6d4c19707ef95942e323cbdc89fbbfdbe45e7cc5.zip rockbox-6d4c19707ef95942e323cbdc89fbbfdbe45e7cc5.tar.gz rockbox-6d4c19707ef95942e323cbdc89fbbfdbe45e7cc5.tar.bz2 rockbox-6d4c19707ef95942e323cbdc89fbbfdbe45e7cc5.tar.xz | |
Splitting out www
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@11952 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'www/getbugs.pl')
| -rw-r--r-- | www/getbugs.pl | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/www/getbugs.pl b/www/getbugs.pl deleted file mode 100644 index 3f1fd89..0000000 --- a/www/getbugs.pl +++ /dev/null @@ -1,18 +0,0 @@ -#!/usr/bin/perl - -@html = `curl --silent "http://sourceforge.net/tracker/?group_id=44306&atid=439118"`; - -@entries = grep {/HREF=\"\/tracker\/index.php/} @html; - -print "<table class=bugs>\n"; -print "<tr><th>submitted</th><th>id</th><th>summary</th><th>submitted by</th><th>assigned to</th></tr>\n"; -for ( @entries ) { - if ( /NOWRAP>(\d+).*?HREF=\"(.*?)\">(.*?)<.*?(nbsp;|\*) (.*?)<.*?\>(\w+)<.*?\>(\w+)</ ) { - ($submit, $assigned, $date, $id, $num, $summary) = ($7, $6, $5, $2, $1, $3); - $submit = "<a href=http://sourceforge.net/users/$submit>$submit</a>" if ( $submit ne "nobody" ); - $assigned = "<a href=http://sourceforge.net/users/$assigned>$assigned</a>" if ( $assigned ne "nobody" ); - - print "<tr><td>$date</td><td><a href=\"http://www.sourceforge.net$id\">$num</a></td><td>$summary</td><td>$submit</td><td>$assigned</td></tr>\n"; - } -} -print "</table>\n"; |