set timeout -1
		   proc a {} {
		   puts "\n"
		   sleep 5
	  	   }

		   spawn telnet 156.26.52.52
        			expect "Password" 
        			send "cisco\r"
        			expect ">"
        			send "en \r"
        			expect "Password"
        			send "cisco\r"
		   expect "#"
		   send "conf t \r"
		   expect "#"
		   send "dial-peer voice 101 voip \r"	
		   expect "#"
                   send "codec g711alaw \r" 
		   expect "#"
		   send "end \r"
		   expect "#"
		   send "exit \r"
		   expect "Connection"
		   send "exit \r"
		   a 
	
		   spawn telnet 156.26.26.26
        			expect "Password" 
        			send "cisco\r"
        			expect ">"
        			send "en \r"
        			expect "Password"
        			send "cisco\r"
		   expect "#"
		   send "conf t \r"
		   expect "#"
		   send "dial-peer voice 101 voip \r"	
		   expect "#"
                   send "codec g711alaw \r" 
		   expect "#"
		   send "end \r"
		   expect "#"
		   send "exit \r"
		   expect "Connection"
		   
		   sleep 20

	
		   #puts "closed session\n"