Opened by vayu at 2007-07-16 10:16
User since
2006-03-29
1520 Artikel
BenutzerIn
2006-03-29
1520 Artikel
BenutzerIn
[quote=Relais,16.July.2007, 12:15][quote=sid burn,16.07.2007, 12:06]besticht die Python Variante mit absoluter Lesbarkeit:[/quote]
Wer hat denn Dich bestochen? ;-)
Ich finde das schwer lesbar und voller unnötiger Wiederholung.
Zugegeben, die findet im inneren der Daten statt, aber dennoch.
Ich finde dagegen mehrere der Perl-Versionen sehr schön lesbar...
Aber vermutlich habe ich nur Deinen Smily überlesen =)[/quote]
Mich hat keiner bestochen, ich wurde nur erleuchtet.
Ansonsten benötigt Ironie keine Smileys.
--------------------------------------------------------
Das sind übrigens meine Zwei Lösungen: Einmal eine etwas längere, und einmal etwas abgekürzt:
\n\n
<!--EDIT|sid burn|1184582156-->
Wer hat denn Dich bestochen? ;-)
Ich finde das schwer lesbar und voller unnötiger Wiederholung.
Zugegeben, die findet im inneren der Daten statt, aber dennoch.
Ich finde dagegen mehrere der Perl-Versionen sehr schön lesbar...
Aber vermutlich habe ich nur Deinen Smily überlesen =)[/quote]
Mich hat keiner bestochen, ich wurde nur erleuchtet.
Ansonsten benötigt Ironie keine Smileys.
--------------------------------------------------------
Das sind übrigens meine Zwei Lösungen: Einmal eine etwas längere, und einmal etwas abgekürzt:
Code: (dl
)
1
2
3
4
5
use LWP::Simple;
my $content = get("http://99-bottles-of-beer.net/lyrics.html");
my @songtext = $content =~ m{<p>(.*?)<br/?>(.*?)</p>}gs;
print "$_\n" for @songtext;
Code: (dl
)
1
2
use LWP::Simple;
print "$_\n" for ( get("http://99-bottles-of-beer.net/lyrics.html") =~ m{<p>(.*?)<br/?>(.*?)</p>}gs )
<!--EDIT|sid burn|1184582156-->
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de