undef in Datei speichern (gelöst) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-12-29 05:09:39
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
1 Gast

[thread]18691[/thread]

submit to reddit

undef in Datei speichern [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 20

Articles: hide open all | hide show old branches

+21 replies
rosti

2013-10-21 09:42
User since
2011-03-19
3492 Artikel
BenutzerIn
Code (perl): (dl )

$x = undef;
in Datei speichern und beim Auslesen soll wieder undef rauskommen. Wie macht Ihr das, bzw. welchen 'Platzhalter' verwendet Ihr für undef?
- +3 replies
- Muffi
  
  2013-10-21 09:47
  
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  
  use JSON; ;)
  [edit] Oder bist du ein bekennender Rad-Neu-Erfinder
  1 + 1 = 10
  - +2 replies
  - rosti
    
    2013-10-21 10:16
    
    User since
    2011-03-19
    3492 Artikel
    BenutzerIn
    
    2013-10-21T07:47:32 Muffi
    use JSON; ;)
    [edit] Oder bist du ein bekennender Rad-Neu-Erfinder
    
    Also, dass wir einen Platzhalter brauchen, heißt ja nicht, dass wir das Rad neu erfinden müssen ;)
    - Muffi
      
      2013-10-21 10:20
      
      User since
      2012-07-18
      1465 Artikel
      BenutzerIn
      
      Nein, aber sich ein Daten-Serialisierungs-Speicher-Wasweissich-Format ausdenken und implementieren im Normalfall schon.
      1 + 1 = 10
- +15 replies
- pq
  
  2013-10-21 11:12
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  JSON, YAML, Storable, Sereal...
  
  Editiert von pq: links zu den modulen
  Last edited: 2013-10-21 11:56:18 +0200 (CEST)
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +3 replies
  - payx
    
    2013-10-21 11:44
    
    User since
    2006-05-04
    564 Artikel
    BenutzerIn
    
    2013-10-21T09:12:01 pq
    ...Sereal...
    
    Cereal? ;-) Oder Serial?
    SCNR
    payx
    - +2 replies
    - GwenDragon
      
      2013-10-21 11:49
      
      User since
      2005-01-17
      14761 Artikel
      Admin1
      
      Schau halt mal, du Kamel Sereal
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - payx
        
        2013-10-21 11:52
        
        User since
        2006-05-04
        564 Artikel
        BenutzerIn
        
        Ja, ich Kamel.
        
        Danke, das kannte ich noch nicht.
  - +11 replies
  - rosti
    
    2013-10-21 12:48
    
    User since
    2011-03-19
    3492 Artikel
    BenutzerIn
    
    Altmeister Storable verwendet das Nullbyte. Irgendwie logisch ;)
    - +8 replies
    - topeg
      
      2013-10-21 17:56
      
      User since
      2006-07-10
      2611 Artikel
      BenutzerIn
      
      Ist aber keine so gute Idee finde ich, denn \000 kann auch gewollt sein.
      
      Code (perl): (dl )
      
      1 2
      
      my @data; my $dj=join("\000",@data)."\000";
      
      Das man das in Storable übersehen heben soll...
      - rosti
        
        2013-10-21 22:00
        
        User since
        2011-03-19
        3492 Artikel
        BenutzerIn
        
        Der Platzhalter allein reicht nicht. Es braucht mindestens ein Byte mehr an Informationen darüber, ob ein Wert überhaupt definiert ist, wenn der Wert selbst darüber nichts aussagen kann oder gar nicht vorhanden ist.
      - +6 replies
      - Raubtier
        
        2013-10-22 00:57
        
        User since
        2012-05-04
        1076 Artikel
        BenutzerIn
        
        Wie man sieht, kommt Storable mit 0 und undef klar:
        
        Code: (dl )
        
        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" ];
        
        +5 replies
        
        topeg
        
        2013-10-22 01:23
        
        User since
        2006-07-10
        2611 Artikel
        BenutzerIn
        
        Das habe ich ja üüüberhaupt und gaaar nicht erwartet! Das Storabe das handhaben kann ist ja sooo unerwartet.
        
        rostis versuche zu beschreiben was passiert:
        
        2013-10-21T10:48:49 rosti
        Altmeister Storable verwendet das Nullbyte.
        
        2013-10-21T20:00:17 rosti
        Der Platzhalter allein reicht nicht.
        
        Das ist so wenig, das man es nur falsch verstehen kann.
        
        Storabe hat für jeden VariablenTypen Flags. Einer der Flags signalisiert das die Variable "undef" ist. Storable nutzt nämlich die perlinternen Variablen-Typen um die Daten zu speichern und wieder herzustellen.
        
        Ein andere Möglichkeit wäre es einen Datentypen "undef" zu haben.
        
        Raubtier
        
        2013-10-22 01:25
        
        User since
        2012-05-04
        1076 Artikel
        BenutzerIn
        
        :-)
        
        +3 replies
        
        rosti
        
        2013-10-22 08:01
        
        User since
        2011-03-19
        3492 Artikel
        BenutzerIn
        
        Moin ;)
        
        eigentlich wollte ich nur wissen, wie Ihr das macht. Was ich diesem Thread abgewinne: Schaue nach, wie das die alten Meister machen.
        
        Viele Grüße!
        
        +2 replies
        
        Gast wer
        
        2013-10-22 12:58
        
        garnicht. module benutzten
        Last edited: 2013-10-22 12:59:58 +0200 (CEST)
        
        Muffi
        
        2013-10-22 14:33
        
        User since
        2012-07-18
        1465 Artikel
        BenutzerIn
        
        Garnicht ist nicht in seinem Enum ;)
        1 + 1 = 10
    - +2 replies
    - Raubtier
      
      2013-10-22 01:15
      
      User since
      2012-05-04
      1076 Artikel
      BenutzerIn
      
      Storable verwendet das Nullbyte für undef?
      
      Erklär mir mal bitte, wie das mit
      
      Code: (dl )
      
      1 2 3
      
      #define C(x) ((char) (x)) /* For markers with dynamic retrieval handling */ ... #define SX_UNDEF C(5) /* Undefined scalar */
      
      zusammenpasst.
      
      Ein simples use Storable; my $a=undef; store \$a, "/tmp/rosti" hat die 5 da drin...
      
      Oder was genau wolltest du sagen?
      - topeg
        
        2013-10-22 01:31
        
        User since
        2006-07-10
        2611 Artikel
        BenutzerIn
        
        Ja fast. Das ist ein Teil des ganzen. Eine Scalar kann verschidenen Typen haben Integer, Referenz, Float usw. So kann es auch einen Interger geben der Undef ist.
        Aber ich habe mir das Ganze nicht so 100% angesehen, kann durchaus sein das es explizit einen Datentypen undef gibt, wenn direkt "undef" verwendet wird. Aber immerhin muss Storabe aus mit anderen XS Modulen zusammenarbeiten und da wird unter Umständen ein undef Integer gebraucht.
- bianca
  
  2013-10-21 11:35
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  Variable mit Data::Dumper in eine Datei schreiben und wieder einlesen mit
  
  Code (perl): (dl )
  
  1 2 3 4
  
  my $var = eval do { local $/; <$fh>; };
  
  ?
  In eigenen Daten habe ich kein undef.
  10 print "Hallo"
  20 goto 10
- topeg
  
  2013-10-21 11:46
  
  User since
  2006-07-10
  2611 Artikel
  BenutzerIn
  
  In perl ist "undef" ein Flag das zur Variable gehört.

View all threads created 2013-10-21 09:42.