使用 perl 脚本挂载远程分区

使用 perl 脚本挂载远程分区

我正在尝试挂载远程服务器分区以进行备份。我已经有 perl 脚本来备份数据。我尝试在脚本中添加挂载命令。以下是脚本,请指导我如何操作。

如果我在控制台上运行它,它会像使用 bash 脚本一样工作。如果我使用 perl 运行它,它会显示安装错误。

#!/usr/bin/perl
system ("mount -t cifs //192.168.178.39/Backup/Data\ folders /mnt/Backup/ -o username=xyz.com/abc.admin,password=12345@0312");

答案1

\\您需要使用或使用 @来转义反斜杠\@(在这种特定情况下,不需要转义,@因为它后面跟着一个数字。如果它后面跟着一个字母,它将被视为数组)。

system ("mount -t cifs //192.168.178.39/Backup/Data\\ folders /mnt/Backup/ -o username=xyz.com/abc.admin,password=12345\@0312");

,或者使用单引号:

system ('mount -t cifs //192.168.178.39/Backup/Data\ folders /mnt/Backup/ -o username=xyz.com/abc.admin,password=12345@0312');

相关内容