iTunesのトラック移動

---

　Win32::OLEを使うためWindowsが対象です。

use strict;
use warnings;

use Win32::OLE;

my $itunes = Win32::OLE->new("iTunes.Application")
	or die "iTunesオブジェクトを作成できません。";

$itunes->nextTrack();	# 次に進める
#$itunes->backTrack();	# 前に戻る

---

関連項目

・iTunesの再生と停止