Data::Dumper bug ? (gelöst) (Allgemeines zu Perl)

[thread]17126[/thread]

Data::Dumper bug ? [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 20

Articles: hide open all | hide show old branches

+6 replies
mark05

2012-02-01 17:10
User since
2010-01-05
131 Artikel
BenutzerIn
hi

folgendes ist mir in der letzten halben stunde aufgefallen.

ich verwende
Code: (dl )

1 2

xxx@refrath:~/perl/imap-sorter$ cat /usr/lib/perl/5.10.1/Data/Dumper.pm | grep "\$VERSION" $VERSION = '2.124'; # Don't forget to set version and release date in POD!
als test fuer den bug
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

#!/usr/bin/perl -w use strict; use warnings; use Data::Dumper; my ($startd,$stopd) = '01.12.2011 31.12.2011' =~ /^(.*)\s(.*)$/smx ; print "$startd\n"; print "$stopd\n"; my $tst = { start=>$startd , stop=>$stopd }; print Dumper $tst; print "$tst->{'start'}\n"; print "$tst->{'stop'}\n";
in der Dumper ausgabe wird das start datum falsch angezeigt .

im der normalen print ausgabe ist es so wie man es erwartet.

ich habe zwar schon versucht via cpan ein upgrade auf Data::Dumper
zu machen aber er sagt das alles up2date ist.

holger
- pq
  
  2012-02-01 17:18
  
  User since
  2003-08-04
  12209 Artikel
  Admin1
  
  zeig doch mal die ausgabe. sieht hier mit version 2.125 ok aus.
  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
- +4 replies
- GwenDragon
  
  2012-02-01 17:27
  User since
  2005-01-17
  14890 Artikel
  Admin1
  Data::Dumper 2.128 unter Perl 5.10.1
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
  
  #!/usr/bin/perl -w use strict; use warnings; use Data::Dumper; my ($startd,$stopd) = '01.12.2011 31.12.2011' =~ /^(.*)\s(.*)$/smx ; print "\$startd=$startd\n"; print "\$stopd=$stopd\n"; my $tst = { start=>$startd , stop=>$stopd }; print Dumper $tst; print q($tst->{'start'} ),"$tst->{'start'}\n"; print q($tst->{'stop'} ),"$tst->{'stop'}\n";
  
  erzeugt:
  
  Code: (dl )
  
  1 2 3 4 5 6 7 8
  
  $startd=01.12.2011 $stopd=31.12.2011 $VAR1 = { 'stop' => '31.12.2011', 'start' => '01.12.2011' }; $tst->{'start'} 01.12.2011 $tst->{'stop'} 31.12.2011
  
  Last edited: 2012-02-01 17:28:30 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +3 replies
  - mark05
    
    2012-02-01 17:45
    
    User since
    2010-01-05
    131 Artikel
    BenutzerIn
    
    oeh komisch jetzt ist es ok ........
    
    komisch bei dem code wo genau der fehler auftritt
    
    aus 01.12.2011 wird 12.01.2011 im us sinne sprich monat zu erst.
    
    hm ich muss mal forschen ...... ob das von irgend abhaengikeit kommt.
    
    holger
    Last edited: 2012-02-01 17:51:59 +0100 (CET)
    - +2 replies
    - pq
      
      2012-02-01 17:49
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      ich sehe da keinen fehler.
      was meinst du genau?
      meinst du die sortierung der daten im hash? ein hash ist nicht sortiert, der wird "quasi" zufällig ausgegeben (hat eine interne sortierung).
      
      oder ich bin grad zu blind, um den fehler zu sehen.
      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
      - mark05
        
        2012-02-03 14:48
        
        User since
        2010-01-05
        131 Artikel
        BenutzerIn
        
        hi
        
        wollte nur bescheid geben das ich das "problem" vor der konsole
        gefunden habe ;)
        
        nein im ernst , ich verwende ja noch Date::Manip das hat als
        default Monat/Tag/Jahr als dateformat .
        und je nachdem ob man vor oder nach einem aufruf einer methode von
        Date::Manip sich das datum ausgeben laesst veraendert sich
        dieses entsprechend.
        
        war etwas verwirrend.
        
        danke nochmal an alle
        
        holger

View all threads created 2012-02-01 17:10.