Help for this page
%FormData = split(/=/, $Part);
my ($name, $value) = split /=/, $Part; $FormData{$name} = $value;