open(my $fh, "<", $filename) or &Util::HTMLError("TOTP seed file not found or permission denied: $! ; $filename");
my $hex_seed = <$fh>;
my $accountname = <$fh>;
open(my $fh, "<", $filename) or &Util::HTMLError("TOTP seed file not found or permission denied: $! ; $filename");
my $hex_seed = <$fh>;
my $accountname = <$fh>;