将英文格式的备注日期转成8位数字日期
前些时做提前到期通知，但脚本中用的是20110310这类的数字备注，而旧路由中是使用的mar/10/2011这样的英文备注，有好几百个用户，手工改太累，所以根据网上脚本改了以下脚本。:local pcom8 ""
:local pcom ""
:local pnam ""
:local ppof ""
/ppp secret
:foreach puse in do={
:set pcom
:set pnam
:local yy ([:find jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec [:pick $pcom 0 3]]+1)
:if ($yy<10) do={:set yy (0 . $yy)}
:set pcom ([:pick $pcom 7 11] . $yy . [:pick $pcom 4 6])
:set pcom8 [:tonum [:pick $pcom 0 8]]
:if ([:len $pcom8] = 8) do={
/ppp secret set comment=($pcom)
}
} 收藏，谢谢分享了。 恩，在阿湘技术上修改而来的，还是不错，能改能用就证明看懂了。 看到英文的就头疼，每次看到帖子说ros怎么怎么的时候想搞的试一哈，就被英文搞杯具了，我们这样的国产还是支持海蜘蛛去吧。杯具哦。。。。 hispider 发表于 2011-3-11 10:26 static/image/common/back.gif
看到英文的就头疼，每次看到帖子说ros怎么怎么的时候想搞的试一哈，就被英文搞杯具了，我们这样的国产还是支 ...
一直都不能克服这个心理障碍就一直无法得到提升，或许你早前就开始积累，到现在已经能运用自如了。这就是个态度问题。 这个真不错，还想过几天手动改呢，真是太感谢了。 回复 zooyo 的帖子
那是一个长时间的积累过程，不是一哈就能行的。
页:
[1]