diff options
| -rw-r--r-- | challenge-111/james-smith/README.md | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/challenge-111/james-smith/README.md b/challenge-111/james-smith/README.md index 96436232a7..57a7914f12 100644 --- a/challenge-111/james-smith/README.md +++ b/challenge-111/james-smith/README.md @@ -315,8 +315,8 @@ sub find_val_hash_pre { | Search | 4,824/s | 150% | -- | -10% | -33% | *-42%* | *-43%* | **-55%** |-76% | -79% | **-92%** | | Grep-Map | 5,388/s | 179% | 12% | -- | -25% | *-36%* | *-36%* | **-50%** |-73% | -77% | **-91%** | | Map-Grep | 7,189/s | 272% | 49% | 33% | -- | *-14%* | *-15%* | **-33%** |-64% | -69% | **-88%** | -| Flatten | *8,389/s* | *334%* | *74%* | *56%* | *17%* | *--* | *-1%* | -22% | *-58%* | *-63%* | ***-86%*** | -| Flatten-@ | *8,432/s* | *337%* | *75%* | *56%* | *17%* | *1%* | *--* | -22% | *-58%* | *-63%* | ***-86%*** | +| Flatten | *8,389/s* | *334%* | *74%* | *56%* | *17%* | *--* | *-1%* | ***-22%*** | *-58%* | *-63%* | ***-86%*** | +| Flatten-@ | *8,432/s* | *337%* | *75%* | *56%* | *17%* | *1%* | *--* | ***-22%*** | *-58%* | *-63%* | ***-86%*** | | **Grep-@** | **10,764/s** | **457%** | **123%** | **100%** | **50%** | ***28%*** | ***28%*** | **--** | -46% | **-53%** | **-82%** | | DNF | 20,080/s | 940% | 316% | 273% | 179% | *139%* | *138%* | **87%** | -- | -12% | **-67%** | | Optimal | 22,936/s | 1,087% | 375% | 326% | 219% | *173%* | *172%* | **113%** | 14% | -- | **-62%** | @@ -391,8 +391,7 @@ sub longest { open my $fh, q(<), $_[0]; my @max = (0); (chomp) ## Remove newline character - #&& !/\W/ ## Remove words with non-alpha chars - && !/[^a-z]/ ## Remove words starting with a capital + && !/[^a-z]/ ## Remove non-lower case characters && ( $max[0] <= length $_ ) ## Remove words that are too short && ( $_ eq join q(), sort split //, $_ ) |