看板 Perl 關於我們 聯絡資訊
我想去掉前八個字元亂碼的檔名 該如何寫呢 original: ????????01.mp3 expected: 01.mp3 共有01-32 ,32個檔案 此外我試寫的sample 為何loop 只會執行一次 感謝 只有第一個會被改成10.mp3 #!/C:/strawberry/perl/bin/perl $a = '????????'; $c ='.mp3'; for ($count=10; $count <= 28; $count++) { # statements inside the loop go here $nn=$count.$c; exec ("rename ".$a.$nn." ".$nn); print $count; #rename ($oo,$nn); } -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 77.0.73.150 ※ 編輯: czberlin 來自: 77.0.73.150 (09/09 03:43) ※ 編輯: czberlin 來自: 77.0.73.150 (09/09 03:45)
ChelseaFC:因為你的$a值一直都是同一個檔名不是嗎?不是loop只執行 09/10 00:47
ChelseaFC:一次,是更名完$a後,就沒有相同檔名的檔案可以供它更改 09/10 00:48
czberlin:我有?????????01.mp3 -????????32.mp3 共32個檔案 09/10 06:41
czberlin:原來exec只能被執行一次, 09/13 05:59
kornelius:why dont you just use @files = <*.mp3>; 09/16 20:35
kaufmann:good idea! tks 09/19 18:12