如何使用sed在perl中用替换last \?

时间:2019-05-03 07:26:35

标签: perl

我要替换

a / b / c | d,385 | 386 | 387 | 388 | 389 | 390 | 391 | 392 | 393 | 394 | 395 | 396 | 397 | 398 | 399 | 400 / 0.162,214 | 229 | 254 | 255 | 270 | 272 | 276 | 287 | 346 | 356 | 361 | 362 | 365 | 366 | 367 | 369 / 0.18,improve / 11.11,

使用

a / b / c | d,385 | 386 | 387 | 388 | 389 | 390 | 391 | 392 | 393 | 394 | 395 | 396 | 397 | 398 | 399 | 400 / 0.162,214 | 229 | 254 | 255 | 270 | 272 | 276 | 287 | 346 | 356 | 361 | 362 | 365 | 366 | 367 | 369 / 0.18,provise,11.11,

我用过

system“ sed -i's /(。*)// \ 1,/'”;

在perl代码中。但这是行不通的。在xterm中用作sed -i's /(。*)// \ 1,/'时,它可以正常工作。

0 个答案:

没有答案