The Weekly Challenge - 330

Monday, Jul 14, 2025| Tags: Perl, Raku

TABLE OF CONTENTS


  1. HEADLINES

  2. SPONSOR

  3. RECAP

  4. PERL REVIEW

  5. RAKU REVIEW

  6. CHART

  7. NEW MEMBERS

  8. GUESTS

  9. TASK #1: Clear Digits

10. TASK #2: Title Capital


HEADLINES


Welcome to the Week #330 of The Weekly Challenge.

Last week, we received the sad news of the passing of fellow Perl hacker Matt S Trout, also known as MST.

It is a significant loss to the Perl community as a whole. RIP my friend MST.

After two consecutive weeks of low turnout, we finally bounced back, thank you, Team PWC.

The guest contributions as well as Perl and Raku submissions also picked up.

The blog posts are coming along well too.

Happy Hacking!!


Last 5 weeks mainstream contribution stats. Thank you Team PWC for your support and encouragements.

  Week      Perl       Raku       Blog   
   325       46       25       29   
   326       48       27       28   
   327       48       24       15   
   328       42       23       21   
   329       45       24       25   

Last 5 weeks guest contribution stats. Thank you each and every guest contributors for your time and efforts.

  Week      Guests       Contributions       Languages   
   325       12       59       21   
   326       13       64       23   
   327       14       36       13   
   328       11       31       11   
   329       15       46       15   

TOP 10 Guest Languages


Do you see your favourite language in the Top #10? If not then why not contribute regularly and make it to the top.

 1. Python     (3470)
 2. Rust       (942)
 3. Ruby       (805)
 4. Haskell    (791)
 5. Lua        (733)
 6. C++        (631)
 7. C          (594)
 8. JavaScript (568)
 9. Go         (507)
10. BQN        (452)

Blogs with Creative Title


  1. Let’s Count All of Our Nice Strings by Adam Russell.

  2. Counter Nice by Arne Sommer.

  3. Nice Integers by Jorg Sommrey.

  4. mangling strings by Luca Ferrari.

  5. Counter-Nice by Matthias Muth.

  6. It MUST be nice! by Packy Anderson.

  7. Fun with strings by Peter Campbell Smith.

  8. Nice Counter by Roger Bell_West.

  9. Endings, Elephants and Explanations by Simon Proctor.

10. Y Translate? by Yitzchak Scott-Thoennes.

11. Not a Nice Problem to Have by Yitzchak Scott-Thoennes.


GitHub Repository Stats


1. Commits: 44,354 (+107)

2. Pull Requests: 12,296 (+41)

3. Contributors: 262

4. Fork: 330

5. Stars: 194



With start of Week #268, we have a new sponsor Lance Wicks until the end of year 2025. Having said we are looking for more sponsors so that we can go back to weekly winner. If anyone interested please get in touch with us at perlweeklychallenge@yahoo.com. Thanks for your support in advance.


RECAP


Quick recap of The Weekly Challenge - 329 by Mohammad Sajid Anwar.


PERL REVIEW


If you missed any past reviews then please check out the collection.


RAKU REVIEW


If you missed any past reviews then please check out the collection.


CHART


Please take a look at the charts showing interesting data.

I would like to THANK every member of the team for their valuable suggestions. Please do share your experience with us.


NEW MEMBERS


Please find out How to contribute?, if you have any doubts.

Please try the excellent tool EZPWC created by respected member Saif Ahmed of Team PWC.


GUESTS


Please check out the guest contributions for the Week #329.

Please find past solutions by respected guests. Please share your creative solutions in other languages.


Task 1: Clear Digits

Submitted by: Mohammad Sajid Anwar

You are given a string containing only lower case English letters and digits.

Write a script to remove all digits by removing the first digit and the closest non-digit character to its left.


Example 1

Input: $str = "cab12"
Output: "c"

Round 1: remove "1" then "b" => "ca2"
Round 2: remove "2" then "a" => "c"

Example 2

Input: $str = "xy99"
Output: ""

Round 1: remove "9" then "y" => "x9"
Round 2: remove "9" then "x" => ""

Example 3

Input: $str = "pa1erl"
Output: "perl"

Task 2: Title Capital

Submitted by: Mohammad Sajid Anwar

You are given a string made up of one or more words separated by a single space.

Write a script to capitalise the given title. If the word length is 1 or 2 then convert the word to lowercase otherwise make the first character uppercase and remaining lowercase.


Example 1

Input: $str = "PERL IS gREAT"
Output: "Perl is Great"

Example 2

Input: $str = "THE weekly challenge"
Output: "The Weekly Challenge"

Example 3

Input: $str = "YoU ARE A stAR"
Output: "You Are a Star"


Last date to submit the solution 23:59 (UK Time) Sunday 20th July 2025.


SO WHAT DO YOU THINK ?

If you have any suggestions or ideas then please do share with us.

Contact with me