use CGI::Simple;

my $data = CGI::Simple->new( $memory_data );

# At this point, you just do $data->param( 'foo' ) to retrieve the val
+ue
# associated with 'foo'. Instead of what you're doing which is $data{ 
+'foo' };
[download]