my $req = POST $url, Content_Type => 'form-data', Content => [ loaderid => $loaderid, zipped => $zipped, user => $user, filetype => $filetype, file => [ $fname ] ]; #### #################### # Load Settings # #################### loaderid = 382 user = Andy zipped = 1 # 0 Not Zipped, 1 Zipped, 2 Gzipped- do not use -1 filetype = 1 # 1 = Measurements, 2 = Outage, 3 = Rotation #### while () { chomp; # no newline s/#.*//; # no comments s/^\s+//; # no leading white s/\s+$//; # no trailing white next unless length; # anything left? my ($var, $value) = split(/\s*=\s*/, $_, 2); $preferences{$var} = $value; }