Pausing a script

[\Dandy\ Randy]

Hello, could use some help finding a way to pause my script for a
predetermined interval during a loop. I have a script that gets some data
for a text file and gathers it into an @array. See below.

open (ADDRESSES, "<data/addresses.txt") or die "Can't open file: $!";
@list=<ADDRESSES>;
close(ADDRESSES);

foreach $list(@list) {
perform function #1
perform function #2
pause 3 seconds
}

I would like a 3 second pause during the above foreach loop. How might I
accomplish this? Thanx!

Randy

 

[Jay Tilton]

: I would like a 3 second pause

sleep(3);

 

[ko]

Hello, could use some help finding a way to pause my script for a
predetermined interval during a loop. I have a script that gets some data
for a text file and gathers it into an @array. See below.

open (ADDRESSES, "<data/addresses.txt") or die "Can't open file: $!";
@list=<ADDRESSES>;
close(ADDRESSES);

foreach $list(@list) {
perform function #1
perform function #2
pause 3 seconds
}

I would like a 3 second pause during the above foreach loop. How might I
accomplish this? Thanx!

Randy

Replace 'pause 3 seconds' with 'sleep 3' in your script.

'perldoc -f sleep' gives you all the details


HTH - keith

 

[Michael Budash]

Hello, could use some help finding a way to pause my script for a
predetermined interval during a loop. I have a script that gets some data
for a text file and gathers it into an @array. See below.

open (ADDRESSES, "<data/addresses.txt") or die "Can't open file: $!";
@list=<ADDRESSES>;
close(ADDRESSES);

foreach $list(@list) {
perform function #1
perform function #2
pause 3 seconds
}

I would like a 3 second pause during the above foreach loop. How might I
accomplish this? Thanx!

Randy

perldoc -f sleep

 

[\Dandy\ Randy]

: I would like a 3 second pause
sleep(3);

Can this code be configured to only pause for half a second? like this
sleep(0.5); or something sililair?

Randy

 

[Michael Budash]

Can this code be configured to only pause for half a second? like this
sleep(0.5); or something sililair?

Randy

i say again:

perldoc -f sleep

RTFM