>>168
Net::Telnet の TELOPT_TTYPE で出来ない？
今手元に好き勝手できる Cisco ルータがないから試せないけど。

>>169
やりたいことが上手く伝わってこない。

my $date = '2005/09/28';
$date =~ s,/,,g;

my $result = $date . sprintf('%02d', $num);

こういう話じゃなさそうだが…。