Nuovo Slacky

[Loris]

mi sono accorto, guardando le entries dai link sul changelog in home che sarebbero formattate correttamente se fossero plain text (errore mio, l'ho testato da shell e non ho pensato a formattarle html per mettele sul web); di seguito lo script con le correzioni per formattare le entry in html:

Ale scusa se ti disturbo ancora, con l'ultimo aggiornamento del changelog ( Mon Mar 26 20:58:57 CDT 2007) nessun lettore di feed riesce a scaricare gli rss dalla fonte eppure in home page funziona tutto regolarmente, infatti il file viene creato regolarmente, può essere un problema di sintassi, magari qualche carattere che incasina qualcosa ?

[masalapianta]

mi sono accorto, guardando le entries dai link sul changelog in home che sarebbero formattate correttamente se fossero plain text (errore mio, l'ho testato da shell e non ho pensato a formattarle html per mettele sul web); di seguito lo script con le correzioni per formattare le entry in html:

Ale scusa se ti disturbo ancora, con l'ultimo aggiornamento del changelog ( Mon Mar 26 20:58:57 CDT 2007) nessun lettore di feed riesce a scaricare gli rss dalla fonte eppure in home page funziona tutto regolarmente, infatti il file viene creato regolarmente, può essere un problema di sintassi, magari qualche carattere che incasina qualcosa ?

uh? l'ho provato in locale con akgregator e funge; dammi il link del rss che vedo se c'e' qualche errore

[Loris]

uh? l'ho provato in locale con akgregator e funge; dammi il link del rss che vedo se c'e' qualche errore

Eccolo http://www.slacky.eu/rss/changelog.rss

[masalapianta]

uh? l'ho provato in locale con akgregator e funge; dammi il link del rss che vedo se c'e' qualche errore

Eccolo http://www.slacky.eu/rss/changelog.rss

l'unica cosa che manca e':

Codice: Seleziona tutto

<?xml version="1.0" encoding="iso-8859-1"?>

come prima riga, ma con akgregator funge lo stesso, btw prova ad aggiungere quella riga prima di:

Codice: Seleziona tutto

<rss version="2.0"> 

[masalapianta]

trovata la magagna:

Codice: Seleziona tutto

      <description>
            a/sysvinit-scripts-1.2-noarch-2.tgz:  Added an '&&' in the /tmp cleanup
           .....

quel '&&' fa sbroccare i parser rss

[Loris]

trovata la magagna:
quel '&&' fa sbroccare i parser rss

Ustia magari si sistema con il prossimo changelog

[masalapianta]

trovata la magagna:
quel '&&' fa sbroccare i parser rss

Ustia magari si sistema con il prossimo changelog

Codice: Seleziona tutto

#!/usr/bin/perl

use strict;
use warnings;
use Digest::MD5 qw(md5 md5_hex md5_base64);
use Encode;

my $baseentrylink='http://www.slacky.it/changelog.php?entry=';

my $url=$ARGV[0];
my $title=$ARGV[1];
my $entriesdir=$ARGV[2];

die "Usage: $0 url rss-title entries-dir" unless ($ARGV[2]);

my @changelog=`wget -O - $url 2>/dev/null`;

my @entry;
my $entrystring;
my $md5cs;
my $descstring;

print "
<?xml version="1.0" encoding="iso-8859-1"?> 
<rss version="2.0">
<channel>
<title>$title</title>
<link>http://www.slacky.it/rss/</link>
<description>Slackware ChangeLog</description>
<language>en-us</language>
<managingEditor>info\@slacky.it</managingEditor>
<docs>http://blogs.law.harvard.edu/tech/rss</docs>
";

print "\t<item>\n";
foreach(@changelog) {
   s/\r//;
   s/&/&/g;
   if( m/--------------------------/ ) {
      $md5cs=md5_hex(Encode::encode_utf8($entrystring));
      print "\t\t<description>\n\t\t\t$descstring\t\t\t\n\t\t</description>\n";
      print "\t\t<link>".$baseentrylink.$md5cs."</link>\n";
      print "\t\t<guid isPermaLink="false">$md5cs</guid>\n";
      print "\t</item>\n";
      open(ENTRIESDIR,">$entriesdir/$md5cs") || die("Error: can't open the entry file $entriesdir/$md5cs!");
      print ENTRIESDIR "$entrystring";
      close(ENTRIESDIR);
      $entrystring='';
      $descstring='';
      print "\t<item>\n";
      next;
   }
   if(m/^\s+.*/) {
      $entrystring.="&nbsp;&nbsp;&nbsp;".$_."<br>";
   } else {
      $entrystring.="<b>".$_."</b><br>";
   }
   if( m/[A-Z][a-z][a-z]\s+[A-Z][a-z][a-z]\s+\d+\s+\d+:\d+:\d+\s+[A-Za-z]+\s+\d+\n*/ ) {
      chomp();
      print "\t\t<title>$_</title>\n";
   } elsif( m/^[^\s]/) {
      $descstring.="\t\t\t$_";
   }
}

$md5cs=md5_hex(Encode::encode_utf8($entrystring));
print "\t\t<guid isPermaLink="false">$md5cs</guid>\n";
print "\t</item>\n";
print "
</channel>\n
</rss>"; 

[Loris]

Ottimo funge, grazie ancora per la disponibilità

[red]

Mi piace proprio il sito nuovo, a parte 2 cose:
1. per grandi risoluzioni non si centra, ma rimane tutto lo spazio bianco a destra. Secondo me sarebbe bello che la visualizzazione fosse sempre centrata;
2. il punto 2 lo autocensuro!!!

Ah, grazie Loris! Colgo anche io l'occasione per ringraziarti di un sito che è ormai un grande punto fisso anche per me

[red]

Vorrei dire che ho detto una puttanata al punto 2... SORRY!

[red]

Anzi adesso lo edito e cambio... che cavolo avevo visto prima?!?

[aschenaz]

Anzi adesso lo edito e cambio... che cavolo avevo visto prima?!?

Bravo! Così non sapremo mai cosa avevi detto!