c:\@Work\Perl>perl -wMstrict -le "my @file = ('foo', 'bar', 'baz'); my $s = 'build-2/\$file[1]'; print qq{'$s'}; " 'build-2/\$file[1]'