I've been playing with an MP3 tag program. I copied a script that reads
the values in a tag and prints them out.
The problem is that one of the tag values is a picture and presumably
the value is some kind of binary value. Once I encounter this problem,
the print() function no longer works - meaning, I never get any more
output even though I know there are more values coming.
Here's the code fragment:
foreach $frame (keys %$frames)
{
# for each frame, get a key-value pair of content-description
($value, $desc) = $mp3->{ID3v2}->get_frame($frame);
print "$frame $desc: ";
# sometimes the value is itself a hash reference containing more
values
if (ref $value)
{
while (($k, $v) = each (%$value))
{
print "\n - $k: $v";
}
print "\n";
}
else
{
print "$value\n";
}
}Any suggestions? ____________________________________________________________________ Steve Gross Tel: 212-284-6558 Director of Information Technology Fax: 212-284-6951 www.jesna.org <http://www.jesna.org/> Cell: 917-575-4028
<<image003.jpg>>
