How to insert delay between two lines in Perl 1

[zhenning]

I have a perl script which telnet to Cisco switches and apply commands. I want to insert a 20 seconds delay between the following two lines because it takes time for the switch to do "wri mem":

$session->cmd('wri mem');
$session->cmd("store\n\n\n");

How can I do it? Thanks a lot!

Zhenning

 

[prex1]

sleep(20);

Franco

http://www.xcalcs.com

: Online engineering calculations

http://www.megamag.it

: Magnetic brakes for fun rides

http://www.levitans.com

: Air bearing pads

 

[zhenning]

Thanks!