ping from a route domain

Used when troubleshootign wioth telnet in a vrd environemnt (as per SOL10467)

 !/usr/bin/perl

 telnetvrd: Simple perl wrapper when trying to troubleshoot using telnet and Virtual Route

 Domains, (See VRD, SOL10467)

 Use as you would with ping, e.g. telnet 192.168.99.1%1902 8080

 It'll save going through the Hex conversion.

 There are plenty of ways to improve it but its simple enough for my needs.

 Easily converted to bash shell if required.

 Note: If BigIP is running code pre 10.1.0, the baseStr value should be changed to:

 "2610:0000:0C10:F501:0000:";

$baseStr="2620:0000:0C10:F501:0000:";

$vrd = ""; $hexvrd = ""; $ip = ""; $port = ""; $arg = "";

($ip, $vrd) = split(/%/, $ARGV[0]); $port = $ARGV[1];

$hexvrd = sprintf("%04x", $vrd); $arg = $baseStr.$hexvrd.":".$ip." ".$port;

`telnet $arg`;

Also, note there is the "rdsh" command in 11.x. This sets a unix shell from the cli that then uses the route domain normally.

e.g.

rdsh 1105
ping 10.10.10.10
 PING 10.10.10.10 (10.10.10.10) 56(84) bytes of data.
64 bytes from 10.10.10.10: icmp_seq=1 ttl=255 time=2.20 ms
64 bytes from 10.10.10.10: icmp_seq=2 ttl=255 time=0.975 ms
 telnet 10.10.10.10 890
Trying 10.10.10.10...
Connected to 10.10.10.10 (10.10.10.10).
Escape character is '^]'.
^]
telnet> quit
Connection closed.

What about testing in 10.2.4? Seems like F5 doesnt want to help those that cant get to new code.