我想创建一个目录,并且想将该目录作为名称打印。
我的代码如下:
#here $directory = www(subdirectory name)
#in @missingfiles I have 1 gif and 1 html file.
my @createDir = `mkdir -p ./RubbishBin/$directory`;
say ("Folder taking @createDir");
my $q = `cp -r @missingFiles @createingDir`;
在我的输出中,我将只得到“ Folder taking @createDir
”而不是打印文件名。
我怎样才能Folder taking RubbishBin/www
在我的输出中获得这种类型的输出“ ”。
答案1
您正在分配mkdir
命令的标准输出至@createDir
。通常,不会产生任何输出 - 但是您可以通过添加( ) 选项mkdir
来产生输出。-v
--verbose
前任。
$ perl -e 'my $directory = "www"; my $createDir = `mkdir -vp "./RubbishBin/$directory"`; print $createDir'
mkdir: created directory './RubbishBin'
mkdir: created directory './RubbishBin/www'