Re: Media Player - CPU Usage

[Lotus1]

in reply to Media Player - CPU Usage

Here is what is shown for this in the synopsis for Win32::MediaPlayer.

    while(1) {
          sleep 1;
          print 'Now Position: '.$winmm->pos(1)."\r";   # Show now tim
+e.
    };

To break out of the while loop you could do this:

       last unless $winmm->pos < $winmm->length;

Update: In order to get the print statement inside the while loop to work I had to add $| = 1; at the top of the program.