La función sleep() en Perl es una función incorporada que se utiliza para retrasar la ejecución del script actual durante un número específico de segundos o para siempre si no se especifica el parámetro. La función sleep() acepta segundos como parámetro y devuelve lo mismo en caso de éxito.
Sintaxis: dormir (segundos)
Devuelve: segundos pasados como parámetro, en caso de éxito
Ejemplo 1:
#!/usr/bin/perl -w # Using localtime() function # to print the time print scalar localtime(); # calling the sleep function sleep(5); print "\n"; print scalar localtime();
Producción:
Thu Mar 28 06:02:21 2019 Thu Mar 28 06:02:26 2019
Ejemplo 2:
#!/usr/bin/perl -w # Using localtime() function # to print the time print scalar localtime(); # Using rand() to generate random delay sleep(rand(7)); print "\n"; print scalar localtime();
Producción:
Thu Mar 28 06:02:26 2019 Thu Mar 28 06:02:27 2019