diff --git a/postfix/acl_security.pl b/postfix/acl_security.pl
index b86a9ede2..f7cc55d66 100755
--- a/postfix/acl_security.pl
+++ b/postfix/acl_security.pl
@@ -12,7 +12,6 @@ our (@acl_pages, %in, %text);
 # Print the form for security options of postfix module
 sub acl_security_form
 {
-my $o;
 foreach my $o (@acl_pages) {
 	print &ui_table_row($text{'acl_'.$o} || $o,
 			    &ui_yesno_radio($o, $_[0]->{$o} ? 1 : 0));
@@ -26,7 +25,6 @@ print &ui_table_row($text{'acl_dir'},
 # Parse the form for security options for the postfix module
 sub acl_security_save
 {
-my $o;
 foreach my $o (@acl_pages) {
 	$_[0]->{$o} = $in{$o};
 	}
diff --git a/postfix/postfix-lib.pl b/postfix/postfix-lib.pl
index 240eb23a2..7836c4afe 100755
--- a/postfix/postfix-lib.pl
+++ b/postfix/postfix-lib.pl
@@ -682,7 +682,6 @@ sub regenerate_aliases
     }
     else
     {
-	my $map;
 	foreach my $map (get_maps_types_files(get_real_value("alias_maps")))
 	{
 	    if (&file_map_type($map->[0])) {
@@ -2369,7 +2368,6 @@ foreach my $p (split(/\t+/, $text)) {
                 }
         }
 my @rv;
-my $k;
 foreach my $k (keys %pmap) {
         my $v = $pmap{$k};
         if (@$v == 1) {