printing a false $something and using a real $something

hey people,

I wrote a news script a while a go to help my understanding of perl and now I am expanding on it to feed my hunger for perl

Anyways, zis is ze code:

sub writeconfig {
open (FILE, ">$CONFIGnewspage/config.txt") || die "Could not open file $!"; {
print FILE "$newspage = \"$CONFIGnewspage\"\n";
print FILE "$wwwnewspage = \"$CONFIGwwwnewspage\"\n";
print FILE "$nameofnews = \"$CONFIGnameofnews\"\n";
print FILE "$nameofsite = \"$CONFIGnameofsite\"\n";
print FILE "$subfont = \"$CONFIGsubfont\"\n";
print FILE "$memfont = \"$CONFIGmemfont\"\n";
print FILE "$subcolour = \"$CONFIGsubcolour\"\n";
print FILE "$memcolour = \"$CONFIGmemcolour\"\n";
close (FILE)
}
}

Now when I submit, it writes this to the config.txt fine.. or atleast kind of. The $'s with CONFIG written in front of them are the inpit from the user. The ones without are fake. The config file is going to be used using the require ""; in another script. The other script uses $newspage, $wwwnewspage etc to define the look of it. So in the config txt I want it to look like:

$newspage = "whatever the user enetered";

But what is happening is:

= "whatever the user enetered";

(actually it is without the ; but I haven;t added that yet).

Can anuone tell me how to stop it from being blank?> I am assuming it is doing this becuade it is looking for the $ values and not finding them and so returning them as null.

cheers,