nandi@nandi-laptop:~/begperl$ perl try_expect.pl

Selecting sproc1 CPU


sproc1>
sproc1>loadprg a.out
Endianness of the ELF file:0
.text matched [text segment]
flag = 0x3
.ctors matched [data segment]
flag = 0x3
.dtors matched [data segment]
flag = 0x3
.data matched [data segment]
sproc1>run
Run mode selected
Buffer Empty = 32
Buffer Empty = 32
Buffer Empty = 32
Buffer Empty = 32
Buffer Empty = 28
SWBKPT hit for SLOT 1..!!  PC-Value : 0x124	 Blk Count = 1  Cycles : 332
$VAR1 = [
          1,
          undef,
          'SWBKPT hit for SLOT 1..!!  PC-Value : 0x124	 Blk Count = 1  Cycles : 332',
          'loadprg a.out
Endianness of the ELF file:0
.text matched [text segment]
flag = 0x3
.ctors matched [data segment]
flag = 0x3
.dtors matched [data segment]
flag = 0x3
.data matched [data segment]
sproc1>run
Run mode selected
Buffer Empty = 32
Buffer Empty = 32
Buffer Empty = 32
Buffer Empty = 32
Buffer Empty = 28
',
          '
',
          bless( \*Symbol::GEN0, 'Expect' )
        ];