use mit Schalter mit require formulieren (gelöst) - #186419 (Fragen zu Perl-Modulen)

bianca

2017-04-30 08:06

User since
2009-09-13
6977 Artikel
BenutzerIn

user image

Guten Morgen!

Wie kann ich in dem Syntaxschema ein sort ergänzen?
Folgender Code wirft leider lauter Fehler, was muss ich ändern?

Vielen Dank!!

Code (perl): (dl )

#!/usr/bin/perl
use strict;
use warnings;
use 5.010;

require JSON; JSON->import('-support_by_pp');
my %test = (1 => 'foo',2 => 'bar');
say "Ergebnis: ".JSON->new->utf8->sort_by(sub {$JSON::PP::a <=> $JSON::PP::b})->escape_slash()->encode(\%test);

10 print "Hallo"
20 goto 10