From c9218d0c33b9fc80694de2b3ddab254609f08f80 Mon Sep 17 00:00:00 2001 From: Miquel Lionel Date: Wed, 24 Feb 2021 18:32:15 +0100 Subject: remove useless install script, simpler randregex --- gpigeon-template.cgi | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'gpigeon-template.cgi') diff --git a/gpigeon-template.cgi b/gpigeon-template.cgi index d16bf3b..c513548 100755 --- a/gpigeon-template.cgi +++ b/gpigeon-template.cgi @@ -40,8 +40,6 @@ sub notif_if_defined{ } delete @ENV{qw(IFS PATH CDPATH BASH_ENV)}; -# execute 'printf "yourpassword" | sha256sum' on a terminal -# and copy the long string $ENV{'PATH'} = '/usr/bin'; my $HAS_MAILSERVER = 0; my $SRV_NAME = $ENV{'SERVER_NAME'}; @@ -53,7 +51,7 @@ my $mymailaddr_pw = q{your_mail_address_password_goes_here}; my $mymail_smtp = q{smtp_domain_goes_here}; my $mymail_smtport = q{smtp_port_goes_here}; my $mymail_gpgid = q{gpgid_goes_here}; #0xlong keyid form -my $PASSWD_HASH = q{password_hash_goes_here}; +my $PASSWD_HASH = q{password_hash_goes_here}; #argon2id hash please my $mymailaddr_escaped = escape_arobase($mymailaddr); my $msg_form_char_limit = 3000; my %text_strings = (link_del_ok => 'Successful removal !', @@ -126,7 +124,7 @@ if (argon2id_verify($PASSWD,$PASSWD_HASH)){ for (1..5){ push @mailform_fn_str_buffer, - $random_mailform_fn_str->randregex('\w{1,15}[0-9]{1,15}'); + $random_mailform_fn_str->randregex('\w{64}'); } my $mailform_fn_str_buffer_nospace = join('',@mailform_fn_str_buffer); -- cgit v1.2.3-70-g09d2