如何在不对持续时间进行硬编码的情况下暂停Perl处理？

I have a Perl script that contains this code snippet, which calls the system shell to get some files by SFTP and unzip them with WinZip:I have a Perl script that contains this code sn