my $allow_modifications = 1; etc..