[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] 请教一下perl的切片操作应该怎么写

读入的变量是INDEX 00 04:00:65,需要转换成04,00,65
最终转换成

04*系数1 + 00*系数2 + 65*系数3
这个代码应该如何写?

  1. my ($a, $b, $c) = (split( /[ :]/, "INDEX 00 04:00:65" ))[-3,-2,-1];
  2. $a * $e1 + $b * $e2 + $c * $e3
复制代码
或者用正则捕捉
  1. my ($a, $b, $c) =  ("INDEX 00 04:00:65" =~ /(\d+):(\d+):(\d+)/)
  2. $a * $e1 + $b * $e2 + $c * $e3
复制代码

TOP

返回列表