summaryrefslogtreecommitdiff
path: root/www/digest/rssify.pl
diff options
context:
space:
mode:
authorBjörn Stenberg <bjorn@haxx.se>2007-01-08 23:52:01 +0000
committerBjörn Stenberg <bjorn@haxx.se>2007-01-08 23:52:01 +0000
commit6d4c19707ef95942e323cbdc89fbbfdbe45e7cc5 (patch)
treed11bbebc69df06d60970d05b4816e13d93602f2d /www/digest/rssify.pl
parent8cece5a745f30234bfced4becfd9dfe4ca1047d4 (diff)
downloadrockbox-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/digest/rssify.pl')
-rwxr-xr-xwww/digest/rssify.pl32
1 files changed, 0 insertions, 32 deletions
diff --git a/www/digest/rssify.pl b/www/digest/rssify.pl
deleted file mode 100755
index ba6fca7..0000000
--- a/www/digest/rssify.pl
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/usr/bin/perl
-
-my $fill = "RRREEEPPP";
-
-my $end++;
-
-while(<STDIN>) {
- my $line = $_;
-
-# $line =~ s/ZAGOR/Björn Stenberg/g;
-
- $line =~ s/Ö/\&Ouml;/g;
- $line =~ s/ö/\&ouml;/g;
- $line =~ s/</\&lt;/g;
- $line =~ s/>/\&gt;/g;
-
- if($line =~ s/(LINK\((\"([^\"]*)\"))/$fill/) {
- my $url = $2;
- $url =~ s/@/\#%40;/g;
- $url =~ s/=/\#%3D;/g;
- $url =~ s/&/\&amp;/g;
- $line =~ s/$fill/LINK\($url/;
- }
- print $line;
-
- if($line =~ /^ *ENDDATE/) {
- if($end++ == 15) {
- last;
- }
-
- }
-}