package main;
use Data::Dump qw(dump);
my $u = Erbe->new;
print $u->{CGI}->header('text/plain');
print dump($u),"\n";
print join "\n", $u->{CGI}->param;