I am writing a program in Perl to access the currently playing track in iTunes for Windows and to get the next 3 songs that iTunes will play. I have the code to get the currently playing song. But I cannot find a way to get the next 3 songs.
I would be open to alternate languages such as Ruby if you know of a way to do this.
Here is my simple Perl code to get the current playing track. I need help getting the next 3 songs
my $iTunesApp = new Win32::OLE("iTunes.Application");
my $track = $iTunesApp->CurrentTrack;
print "Current Track: " . $track->Name . "\nCurrent Artist: " . $track->Artist . "\n"