How to pass the value of a variable in perl to an external program?

Question

Perl

Can you please tell me how to correctly pass the value of $ word to system () for further execution in the command?
I tried options with different quotes, escaping. I can not figure it out, please tell me how the value is correctly transferred.

#!/usr/bin/perl
my $word = 'test';
#my $file = '/home/text.txt'
my @cmd = q[echo "$word" >> "/home/text.txt"];
system(@cmd);

Answer 1

Try like this:

#!/usr/bin/perl
my $word = 'test';
#my $file = '/home/text.txt'
my @cmd = qq(echo "$word" >> "/home/text.txt");

system(@cmd);

q() is single quote wrapping without interpolation,
qq() is double quotes with interpolation (i.e. substitution of variable values)