Change 32016 breaks a test in MPEG::Audio::Frame

[Slaven Rezic <slaven@rezic.de>]

The change 32016 (in maint-5.8: 32018) breaks the t/04-tie.t test in
MPEG-Audio-Frame-0.09. It seems that overloading together with tied
objects behave differently now. In perl-5.8.8, the object looked like
a hash:

MPEG::Audio::Frame::asbin(/var/tmp/CPAN-build/MPEG-Audio-Frame-0.09-avy6LE/blib/lib/MPEG/Audio/Frame.pm:272):
272:            $self->{binhead} . $self->{crc_sum} . $self->{content}
  DB<2> x $self
0  MPEG::Audio::Frame=HASH(0x8416cd8)
   'binhead' => 'ÿû@'
   'bitrate' => 128
   ... etc ...

while in current maintperls it looks like a blessed glob:

MPEG::Audio::Frame::asbin(/var/tmp/CPAN-build/MPEG-Audio-Frame-0.09-avy6LE/blib/lib/MPEG/Audio/Frame.pm:272):
272:            $self->{binhead} . $self->{crc_sum} . $self->{content}
  DB<2> x $self
0  MPEG::Audio::Frame=GLOB(0x841f888)
   -> *main::DATA
         FileHandle({*main::DATA}) => fileno(3)

Regards,
    Slaven

---

Follow-Ups from:

Nicholas Clark <nick@ccl4.org>
Nicholas Clark <nick@ccl4.org>

---

[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]

---