Select Code to Download

my $out = qq(var adeldesc = "$adeldesc"\n);

my $outfile = '/home/aml33704/public_html/weather.js';

open W, ">", $outfile or die "Could not open $outfile for writing:$!\n
+";