Select Code to Download

sub slow_print {
    my $subscript = shift;
...
    }
    print "\n\n";
}

# comments refer to benchmark tests using ~/Documents/ and ~/etext/ di
+rs
sub want_file {
...
    }
    closedir D;
}