$line[0] = 'i need $money';  # set variable directly, since I don't have your file.
$line[0] =~ s/"  "/" "/g;
print $line[0];  # not $lines[0]