Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env -S perl 
    # Author: Celogeek
    ...
    say "Read : ", scalar(@todo) / $read;
    say "Found: ", $found;
    say "Mem  : ", get_current_process_memory() - $mem;
    
  2. or download this
    #!/usr/bin/env -S perl 
    # Author: Celogeek
    ...
    say "Read : ", scalar(@todo) / $read;
    say "Found: ", $found;
    say "Mem  : ", get_current_process_memory() - $mem;
    
  3. or download this
    #!/usr/bin/env -S perl 
    # MCE::Shared::Cache test
    ...
    say "Read : ", scalar(@todo) / $read;
    say "Found: ", $found;
    say "Mem  : ", get_current_process_memory() - $mem;
    
  4. or download this
    #!/usr/bin/env -S perl 
    # MCE::Shared::Cache test with expires
    ...
    say "Read : ", scalar(@todo) / $read;
    say "Found: ", $found;
    say "Mem  : ", get_current_process_memory() - $mem;
    
  5. or download this
    #!/usr/bin/env -S perl
    # parallel demonstration
    ...
     
    say "Read : ", sprintf("%0.3f", scalar(@todo) / $read);
    say "Found: ", $found->get();
    
  6. or download this
    #!/usr/bin/env -S perl
    # parallel demonstration
    ...
     
    say "Read : ", sprintf("%0.3f", scalar(@todo) / $read);
    say "Found: ", $found->get();
    
  7. or download this
    #!/usr/bin/env -S perl 
    # Author: Celogeek
    ...
    say "Read : ", scalar(@todo) / $read;
    say "Found: ", $found;
    say "Mem  : ", get_current_process_memory() - $mem;