?Bad dumper code? but you need the close PF outside the while loop.

use Data::Dumper;
use CGI;
$q = new CGI;
%passfile = ( 'me' => 'secret7', 'you' => 'foo' );
print $q->header;
print '<pre>' . $q->escapeHTML(Dumper(\%passfile)) . '</pre>';
[download]

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print