Parsing data to seperate lines("newbie)

[craazycanuck]

Sorry guys, I realize this is an easy question but, I can't get my data to print to seperate lines...can't figure out where I am going wrong

#!/usr/bin/perl
print "Content-type: text/html\n\n";
$forminfo = <STDIN>;
@key_value_pairs = split(/&/,$forminfo);
foreach $pair (@key_value_pairs){
($key,$value) = split(/=/,$pair);
$value =~ s/\+/ /g;
$value =~ s/%([0-9a-fA-F][0-9a-fA-F])/pack(&quot;C&quot;, hex($1))/eg;
$FORM_DATA{$key} = $value;
}
print $FORM_DATA{'personname'},&quot;\n\n&quot;;
print $FORM_DATA{'address'}, &quot;\n\n&quot;;
print $FORM_DATA{'phone1'}, &quot;\n\n&quot;;
print $FORM_DATA{'phone2'}, &quot;\n\n&quot;;
print $FORM_DATA{'phone3'}, &quot;\n\n&quot;;

 

[sackyhack]

When a browser renders HTML it ignores things like newlines. What you need is some <BR> to tell the browser to start a new line.

print &quot;$FORM_DATA{'personname'}<BR>\n&quot;;
print &quot;$FORM_DATA{'address'}<BR>\n&quot;;
print &quot;$FORM_DATA{'phone1'}<BR>\n&quot;;
print &quot;$FORM_DATA{'phone2'}<BR>\n&quot;;
print &quot;$FORM_DATA{'phone3'}<BR>\n&quot;;