retrieve accounts list in the caller

bin/account-manager.pl.in

@@ -137,10 +137,16 @@ sub list_accounts {
         }
         printf "%d accounts removed\n", scalar @$accounts;
 
+        $accounts =
+            IdPAccountManager::Data::TestAccount::Manager->get_testaccounts(
+                db => $db
+            );
+
         die "failed to update simpleSAMLphp configuration file\n"
             unless IdPAccountManager::Tools::update_ssp_authsources(
                 $configuration->{templates_dir},
-                $configuration->{idp_accounts_file}}
+                $configuration->{idp_accounts_file},
+                $accounts
             );
 
         printf "Update simpleSamlPhp configuration file...\n";

lib/IdPAccountManager/Tools.pm

@@ -8,8 +8,6 @@ use Encode;
 use Template;
 use Template::Stash;
 
-use IdPAccountManager::Data::TestAccount::Manager;
-
 INIT {
     ## a TT2 virtual method to get a variable type
     $Template::Stash::LIST_OPS->{isa} = sub {
@@ -82,14 +80,14 @@ sub generate_password {
 
 ## Updates simpleSamlPhp authsources.php configuration file
 sub update_ssp_authsources {
-    my ($templates_dir, $output) = @_;
+    my ($templates_dir, $output, $accounts) = @_;
 
     my $tt2 = Template->new({
         INCLUDE_PATH => $templates_dir
     });
     my $template = 'accountProfiles/valid-accounts.php.tt2';
     my $data = {
-        accounts => IdPAccountManager::Data::TestAccount::Manager->get_testaccounts(),
+        accounts => $accounts
     };
 
     return $tt2->process($template, $data, $output);

lib/IdPAccountManager/WebRequest.pm

@@ -488,6 +488,7 @@ sub req_validate_token {
     unless (IdPAccountManager::Tools::update_ssp_authsources(
             $self->{configuration}->{templates_dir},
             $self->{configuration}->{idp_accounts_file},
+            \@accounts
         )) {
         push @{ $self->{out}->{errors} }, "accounts_creation_failed";
         $self->{logger}->error(