# Set everything to initially be executed
for (keys %scripts) { $scripts{$_}{execute}++; }

##</code><code>##

$scripts{1}{execute} = 1
$scripts{2}{execute} = 1
etc...

##</code><code>##

    for (keys %scripts) { $scripts{$_}{execute}=undef; }

##</code><code>##

    # Skip this one if we need to
    next SCRIPT if !defined $scripts{$script}{execute};

##</code><code>##

map { $scripts{$_}{execute}++; } keys %scripts;