perl – 如何处理带空格的文件名?

前端之家收集整理的这篇文章主要介绍了perl – 如何处理带空格的文件名?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我在Windows上使用Perl(Active Perl).我有一个perl程序来整理当前文件夹中的文件,并使用从内部调用的dos copy命令将它们连接起来使用system()…

当我执行时,这会给出一个dos错误,说“系统找不到指定的文件”.它与我拥有的文件名中的空格有关.

这是perl代码: –

@files = glob "*.mp3";
$outfile = 'final.mp3';
$firsttime = 1;
foreach (@files)
{

    if($firsttime == 1)
    {
       @args = ('copy',"/b ","$_","+","$outfile","$outfile");
       system (@args);
       #system("copy /b '$_'+$outfile $outfile"); 
       $firsttime = 0;  
    }
    else
    {
       @args = ('copy',"$outfile");
       system (@args);
       #system("copy /b $outfile+'$_' $outfile"); 
    }

}

glob返回当前文件夹中的文件名数组,这些文件名之间有空格,因此数组元素之间有空格.当我使用系统(…)使用“$_”对这些数组元素执行我的复制命令时,如上所示,它给出了如上所述的错误.

我尝试了几种可以调用系统的方法(…),但没有任何成功.

我想知道,

1]如何使用上面的代码处理它们之间有空格的文件.如何“逃避”文件名中的空格.

2]在Perl中实现同样的任何替代解决方案. (简单的欢迎..)

解决方法

您的代码不会在文件名周围添加任何引号.

尝试

"\"$_\""

"\"$outfile\""
原文链接:https://www.f2er.com/Perl/172895.html

猜你在找的Perl相关文章