$x = undef;
2013-10-21T07:47:32 Muffiuse JSON; ;)
[edit] Oder bist du ein bekennender Rad-Neu-Erfinder
1
2
3
4
5
6
7
8
perl -wE'use Storable;my @data=qw(a);push @data,undef;push @data, chr(0); push @data,"d";store \@data, "/tmp/store"'
perl -wE'use Storable;my $aref = retrieve "/tmp/store";use Data::Dumper;$Data::Dumper::Useqq=1;print Dumper $aref'
$VAR1 = [
"a",
undef,
"\0",
"d"
];
2013-10-21T10:48:49 rostiAltmeister Storable verwendet das Nullbyte.
2013-10-21T20:00:17 rostiDer Platzhalter allein reicht nicht.
1
2
3
#define C(x) ((char) (x)) /* For markers with dynamic retrieval handling */
...
#define SX_UNDEF C(5) /* Undefined scalar */