[tex-live] Install failed on Windows 8 (*.win32 packages involved)

[Siep Kroonenberg]

On Mon, Feb 24, 2014 at 11:29:18PM +0100, Denis Bitouzé wrote:
> Le lundi 24/02/14 à 17h53,
> Siep Kroonenberg <siepo at cybercomm.nl> a écrit :
> 
> > I did a minimal single-user install
> 
> Thanks.
> 
> > under w8.1 and had no trouble.
> 
> Sigh... ;)
> 
> > At that line the installer tries to create a file. Apparently it has
> > no problems creating the directory:
> > 
> > 1403 mkdirhier( $tlpod );
> > 1404 open(TMP,">$tlpod/".$tlpobj->name.".tlpobj") ||
> > 1405   die "$0: open tlpobj " . $tlpobj->name . "failed: $!";
> > 
> > Maybe a timing problem? You could test this by inserting `sleep 1;'
> > after mkdirhier.
> 
> Well, one second added for each (I guess) one of the 2791 packages to be
> installed: what a sooooo slow install... ;)
> 
> But you're right: that did the trick!
> 
> I guess hard coding this extra sleep wouldn't be the best solution to
> this problem. Do you see a more clever solution?

On Windows, I have run into timing problems before. But there is a
more fine-grained timer module, which is included in w32 TL perl. From
http://stackoverflow.com/questions/896904/how-do-i-sleep-for-a-millisecond-in-perl

###

use Time::HiRes qw(usleep nanosleep);

# 1 millisecond == 1000 microseconds
usleep(1000);

###

-- 
Siep Kroonenberg