Monta a partição remota usando scripts perl

Question

Estou tentando montar a partição do servidor remoto para fazer backup. Eu já tenho o script perl para fazer backup de dados. Estou tentando adicionar o comando mount no script. O abaixo é o roteiro, por favor me guie como fazê-lo.

Se eu o executar no console, ele funciona e também com o script bash. Se eu executar isso com perl, seu erro de montagem show.

#!/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");

    

Answer 1

Você precisa escapar da barra invertida usando \ e @ usando \@ (neste caso específico, não é necessário escapar do @ , pois é seguido por um dígito. Se for seguido por uma letra, será considerado como array).

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

ou use aspas simples:

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