Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • I've been doing this in iTunes since before there WAS an iTunes (that is, in SoundJam, its predecessor), from ircle. I have /next, /play, /stop, /previous, /np, etc., all as small compiled AppleScripts, which is quite a bit faster than compiling AppleScript on the fly.

    brian may wish to look into including compiled AppleScripts with the module, or, better yet, using osacompile to write out scripts to a directory during make, or on demand. Something like:

    my $folder = dirname($INC{'Mac/iTunes.pm');
    my $scri

    • Yeah, Mac::iTunes is incredibly slow, thus my first ever direct use of fork in Perl code.
      --
      Casey West
      • i'm not too worried about speed at the moment. once Mac::iTunes::AppleScript loads, things are faster than i expected. if you use it for only one command then dump out of the script, well, that's what you get.

        i'm also working on an iTunes command server so a daemon process accepts commands.

        i'll check out the compiled stuff later. right now i'm still wrestling with iTunes to make it do what it advertises. :)