我有一个文件,文件内容如下:
>>> /opt/macwalk/walk_bin/switch_batch_cmd.sh start Sun Mar 30 00:34:21 CST 20082 401 0013d33598b9
2 401 0014782e1158
3 401 000e7becc12c
3 401 001109b5d326
4 401 001109b5d386
5 401 00d059cad226
7 401 0011d823e501
8 401 0040cacbb27a
10 401 00c09fde2484
-------------------------------------------------------------->>> /opt/macwalk/walk_bin/switch_batch_cmd.sh start Sun Mar 30 02:33:40 CST 20084 401 001109b5d386
18 401 0016363360a8-------------------------------------------------------------->>> /opt/macwalk/walk_bin/switch_batch_cmd.sh start Sun Mar 30 04:34:14 CST 2008
--------------------------------------------------------------我想通过perl 将文件内容生成
2#401#0013d33598b9
2#401#0014782e1158
3#401#000e7becc12c
3#401#001109b5d326
4#401#001109b5d386
5#401#00d059cad226
7#401#0011d823e501
8#401#0040cacbb27a
10#401#00c09fde2484
4#401#001109b5d386
18#401#0016363360a8小弟初学,在线等,请给出代码