XMMS2 Titel ausgeben - #106816 (Fragen zu Perl-Modulen)

DrWhiteLetter

2008-03-07 19:59

User since
2005-01-30
26 Artikel
BenutzerIn
[default_avatar]

Hi,

ich habe da ein kleines Problem mit dem richtigen Ansprechen eines Array oder Hashes.

Es geht in folgendem Modul um die Methode "medialib_get_info":
http://search.cpan.org/~flora/Audio-XMMSClient-0.0...

Hier mal ein Beispielcode:

Code: (dl )

use warnings;
user strict; 

use Data::Dumper;
use Audio::XMMSClient;

my $conn = Audio::XMMSClient -> new ('xxx');
$conn -> connect;

my $result = $conn -> playback_current_id -> wait -> value;
my %info = $conn -> medialib_get_info($result) -> wait -> value;

print Dumper( %info );

Das ergibt folgenden Fehler:

Code: (dl )

1
2
3

Reference found where even-sized list expected at datadumperl.pl line 12.
$VAR1 = 'Audio::XMMSClient::Result::PropDict=HASH(0x82552b8)';
$VAR2 = undef;

Das sagt mir jetzt irgendwie nicht viel. Aber wenn ich die Rückgabe nun in ein Array schreibe, also

Code: (dl )

1
2

my @info = $conn -> medialib_get_info($result) -> wait -> value;
print Dumper( @info );

Bekomme ich diese Ausgabe:

Code: (dl )

$VAR1 = bless( {
               'lmod' => 1201178022,
                 'bitrate' => 218876,
                 'status' => 1,
                 'date' => '2008',
                 'added' => 1201626189,
                 'timesplayed' => 16,
                 'size' => 6061241,
                 'sample_format' => 'S16',
                 'url' => 'file:///home/daten/music/xxx/xxx.mp3',
                 'id' => 69,
                 'isvbr' => 1,
                 'channels' => 2,
                 'samplerate' => 44100,
                 'tracknr' => 17,
                 'duration' => 221544,
                 'genre' => 'Pop',
                 'chain' => 'file:magic:id3v2:magic:mad',
                 'artist' => 'xxx',
                 'album' => 'xxx',
                 'comment' => 'noir\'08',
                 'title' => 'xxx',
                 'laststarted' => 1204912420,
                 'mime' => 'audio/mpeg'
               }, 'Audio::XMMSClient::Result::PropDict' );

(mit den xxx'en wurden einige Daten von mir versteckt)

Das sieht für mich aus wie ein Hash-Array, aber das klappt ja nicht. :(
Wie komm ich nun an die Daten? Wenn ich über das Array darauf
zugreifen will, erhalte ich nur die Fehlermeldung, dass das ja ein
Hash-Array sei und ich es nicht umwandeln kann.

Ich sitze da jetzt schon 2 Stunden dran und bin echt am verzweifeln...

Danke schonmal.