$telnetSoc->open(); #passed open $telnetSoc->login($user,$pass); #always stop here
*this piece of code wants to show the sequence :D not intended to give full completely code :D i can assume no miss type code syntax* I have try to dump the message and this is the dump message this is error message for host with portA using telnet module
< 0x00000: ff fd 18 ÿý. > 0x00000: ff fc 18 ÿü. < 0x00000: ff fe 18 ff fb 01 ff fb 03 ff fc 21 ff fd 01 0d ÿþ.ÿû.ÿ +û.ÿü!ÿý.. < 0x00010: 0a 0d 0a 20 54 65 6c 6e 65 74 20 63 6f 6e 6e 65 ... Tel +net conne < 0x00020: 63 74 20 74 6f 20 43 4f 4e 53 4f 4c 45 53 45 52 ct to C +ONSOLESER < 0x00030: 56 45 52 20 39 30 30 30 20 73 65 72 69 61 6c 2d VER 900 +0 serial- < 0x00040: 34 34 20 0a 0d 00 0d 0a 0d 00 44 .... +... > 0x00000: ff fd 01 ff fd 03 ff fc 01 ÿý.ÿý.ÿ +ü. < 0x00000: ff fe 01 ÿþ. < 0x00000: 0d 0d 0a 50 65 72 6c 65 20 43 4f 4e 53 4f 4c 45 ...Perl +e CONSOLE < 0x00010: 53 45 52 56 45 52 20 39 30 30 30 20 SERVER +9000 < 0x00000: 0d 0d 0a 56 65 72 73 69 6f 6e 20 33 2e 32 2e 30 ...Vers +ion 3.2.0 < 0x00010: 2e 47 0d 0d 0a .G... < 0x00000: 0d 0a 6c 6f 67 69 6e 3a 20 ..login +:
this is error message for host with portB using telnet module
< 0x00000: 53 65 6c 65 63 74 65 64 20 68 75 6e 74 20 67 72 Selecte +d hunt gr < 0x00010: 6f 75 70 20 62 75 73 79 0d 0a oup bus +y..
Edit: g0n - replaced pre tags with code tags
In reply to Can't connect to telnet server problems by kampret77
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |