Matti: Einsatz von XHTML

Beitrag lesen

Hallo,

ich habe lange(!) kein perl mehr programmiert, aber das Einlesen mit "slurp mode" sollte doch ein wenig schneller sein als die String-Konkatenierun in der while-Schleife.

Probier bitte mal

#!/usr/bin/perl

use strict;
use warnings;
use JSON ();

my $json;
{
  open my $fh, '<:utf8', 'selfwiki.bin';
  local $/;
  $json = <$fh>;
  close $fh;
}

my $data = JSON->new()->decode($json);
print "done\n";

Viele Grüße Matti