Seitenanfang

Blog Dancing

Dieser Post wurde aus meiner alten WordPress-Installation importiert. Sollte es Darstellungsprobleme, falsche Links oder fehlende Bilder geben, bitte einfach hier einen Kommentar hinterlassen. Danke.


Wie lange dauert es, einen Blog zu schreiben? Nicht einen einfachen Post, sondern ein ganzes Blog-System? Gábor, Begründer des Padre-Projektes, zeigt in seinem neusten Screencast, dass es nicht mehr als 17 Minuten dauert - ausführliche Erläuterungen inklusive.

Er benutzt dazu das Dancer Framework für Perl

[youtube]NGX5pgKWVoc[/youtube]

Der gesamte Quellcode beschränkt sich dabei auf wenige Zeilen:

package Dwimmer;
use Dancer ':syntax'; 

use File::Slurp qw(read_file write_file);

our $VERSION = '0.01'; get '/' => sub { my $filename = config->{dwimmer}{json}; my $json = -e $filename ? read_file $filename : '{}'; my $data = from_json $json; template 'index', {data => $data}; };

get '/page' => sub { template 'page'; };

post '/page' => sub { my $filename = config->{dwimmer}{json}; my $json = -e $filename ? read_file $filename : '{}'; my $data = from_json $json; my $now = time; $data->{$now} = { title => params->{title}, text => params->{text}, };

write_file $filename, to_json($data); redirect '/'; };

true;

...und jetzt soll noch einer behaupten, Perl wäre unlesbar und kompliziert :-)
 

Noch keine Kommentare. Schreib was dazu

Schreib was dazu

Die folgenden HTML-Tags sind erlaubt:<a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>