diff --git a/lib/AccountManager/App.pm b/lib/AccountManager/App.pm
index 4f96f4827c9076bdaa607c4d86b516a9bf21057a..73be30b13286aa1bb646d5100d5d543924ade2c8 100644
--- a/lib/AccountManager/App.pm
+++ b/lib/AccountManager/App.pm
@@ -144,6 +144,12 @@ sub new {
 sub run {
     my ($self) = @_;
 
+    if ($self->{logger}->is_debug()) {
+        require Data::Dump;
+        my %parameters = $self->{cgi}->Vars();
+        $self->{logger}->debugf("input parameters: %s", Data::Dump::dump(\%parameters));
+    }
+
     # process requested action
     my $action = $self->{cgi}->param('action') || 'home';
     if ($actions{$action}) {