We are happy to announce that CosmoShop supports the German Perl/Raku-Workshop.
CosmoShop is the largest pure Perl based shop system.
Since 1997, we have been implementing sophisticated and individual eCommerce projects in the B2B sector with our specially developed store software. We are the central point of contact for the entire spectrum.
These are some answers to the Week 273, Task 1, of the Perl Weekly Challenge organized by Mohammad S. Anwar.
Spoiler Alert: This weekly challenge deadline is due in a few days from now (on June 16, 2024 at 23:59). This blog post provides some solutions to this challenge. Please don’t read on if you intend to complete the challenge on your own.
Task 1: Percentage of Character
You are given a string, $str and a character $char.
Write a script to return the percentage, nearest whole, of given character in the given string.
Example 1
Input: $str = "perl", $char = "e"
Output: 25
Example 2
Input: $str = "java", $char = "a"
Output: 50
Example 3
Input: $str = "python", $char = "m"
Output: 0
Example 4
All three of us returned.
We only had one issue to discuss, the pressing matter of how to handle lexical unimports, builtin version bundles, the integration with use VERSION, and various related topics.
It’s complicated. We’ve been putting together a longer mail on the subject and that will come out as its own thread soon.
The 2023 Dancer Advent Calendar, the Twelve Days of Dancer is up and running! We hope you'll enjoy this year's version - there's a lot of fun and practical gifts to be found there.
Hot on the heels of our earlier gift (Dancer2 1.1.0) come two more plugin releases, Dancer2::Plugin::Cache::CHI and Dancer2::Plugin::Syntax::GetPost.
Enjoy! Let us know what you think. Happy holidays to all! (and now it is time for this Dancer to enjoy a long winter's nap)
Jason/CromeDome
I started to also post on dev.to and will post there mostly about topics larger than Perl : psychology of programming, software engineering and alike.
These are some answers to the Week 272, Task 2, of the Perl Weekly Challenge organized by Mohammad S. Anwar.
Spoiler Alert: This weekly challenge deadline is due in a few days from now (on June 9, 2024 at 23:59). This blog post provides some solutions to this challenge. Please don’t read on if you intend to complete the challenge on your own.
Task 2: String Score
You are given a string, $str.
Write a script to return the score of the given string.
The score of a string is defined as the sum of the absolute difference between the ASCII values of adjacent characters.
Example 1
I am sick and tired of hearing this, so let's put it this to the test. Assume you know little of Perl, or any programming language for that matter. Can you parse the code?
https://chrisarg.github.io/Killing-It-with-PERL/2023/12/06/Is-Perl-a-write-only-language.html
I hope the piece above is the first in a series to convince people to consider the reality before passing judgement. It was inspired by one of our research analysts discovering Perl and awk to simplify their lives when cleaning data.
Season's Greetings, Perl!
I've spent almost all of my time since my [last post here](
https://blogs.perl.org/users/ingy_dot_net/2023/05/perl-toolchain-synergy.html)
working on a new programming language, YAMLScript.
It's working now and I've decided a do a [2023 Advent YAMLScript Blog](
https://yamlscript.org/posts/advent-2023/index/) for it.
The blog started last Friday and will continue (at least) until December 24th.
I encourage you to follow along. At some point this month YAMLScript modules
will become available for CPAN and Raku and many other languages.
I also encourage you to try writing an [Advent of Code 2023](
https://adventofcode.com/) solution in YAMLScript, if you are playing along
with AoC this year.
All the Best, Ingy döt Net
These are some answers to the Week 272, Task 1, of the Perl Weekly Challenge organized by Mohammad S. Anwar.
Spoiler Alert: This weekly challenge deadline is due in a few days from now (on June 9, 2024 at 23:59). This blog post provides some solutions to this challenge. Please don’t read on if you intend to complete the challenge on your own.
Task 1: Defang IP Address
You are given a valid IPv4 address.
Write a script to return the defanged version of the given IP address.
A defanged IP address replaces every period “.” with “[.]".
Example 1
Input: $ip = "1.1.1.1"
Output: "1[.]1[.]1[.]1"
Example 2
Input: $ip = "255.101.1.0"
Output: "255[.]101[.]1[.]0"
This the first time that I hear that an IP address could be "defanged."
Defang IP Address in Raku
See Perl.html
It's an example of the fabulous TiddlyWiki (tiddlywiki.com), so it's about 230,000 bytes.
The PSC met today. In summary:
- Paul’s TPRF grant was accepted, he plans to spend some of that time to work on some PPCs first (
qt strings, overload)
- FOSDEM Perl Devroom CfP: none of us are planning to attend in person, but if someone else wanted to present on our behalf we could coördinate with them and work out a subject to talk about
- Discussed coming up with a Perl roadmap that we could present to the world (and entice sponsorship for TPRF’s Perl Development Fund and Grants program)
- We discussed opening up our meetings to the occasional guest, so they could see what we’re actually doing (boring!) and give us an outside perspective
I've struggled with the syntax highlighting here on this blog. I really want to use this site and I will continue to do so.
After trying in vain to get some "auto" syntax highlighting here via the editor, I reached for an old trick I've used in the past. Generating HTML using some external service. After a quick Google search, I found https://tohtml.com/perl/. Given a block of Perl code, it'll generate HTML based syntax highlighting that one may add to their post. For example,
Decent Syntax Highlighting (from tohtml.com/perl)
These are some answers to the Week 271, Task 2, of the Perl Weekly Challenge organized by Mohammad S. Anwar.
Spoiler Alert: This weekly challenge deadline is due in a few days from now (on June 2, 2024 at 23:59). This blog post provides some solutions to this challenge. Please don’t read on if you intend to complete the challenge on your own.
Task 2: Sort by 1 Bits
You are given an array of integers, @ints.
Write a script to sort the integers in ascending order by the number of 1 bits in their binary representation. In case more than one integers have the same number of 1 bits then sort them in ascending order.
Example 1
(English below)
Der nächste Deutsche Perl/Raku-Workshop wird vom 15. bis 17. April 2024 in Frankfurt stattfinden. Damit wir interessante drei Tage mit Perl und Raku verbringen können, brauchen wir Vorträge und Teilnehmer... Vortragsvorschläge könnt ihr bereits einreichen und auch anmelden könnt ihr euch schon hier...
https://act.yapc.eu/gpw2024
The German Perl/Raku workshop will take place
on the 15th to 17th April 2024 again in Frankfurt am Main.
We will spend three interesting days with Perl and Raku, so you are invited
to participate and also to give presentations.
You can submit your presentations here
I released Juliagraph an interactive fractal painter for Julia and Mandelbrot types of fractal.

We have had a good number of responses, but would like more. And time is running out! Please take this survey and share with your Perl contacts.
Survey URL: https://forms.gle/DDPWsNqEsZW8AyWX7
The track would target academic and industrial STEM applications, and emulate in some way traditional science conference tracks; meaning the talks would be based on paper and poster submissions. If this came to pass, the Science Perl Committee would also follow up with the publishing of the papers in an official proceedings of this track.
Survey officially closes on Thursday, November 23, 2023. But we would love your feedback!
Sincerely,
Brett Estrade
oodler@cpan.org
Chairman, Science Perl Committee
These are some answers to the Week 271, Task 1, of the Perl Weekly Challenge organized by Mohammad S. Anwar.
Spoiler Alert: This weekly challenge deadline is due in a few days from now (on June 2, 2024 at 23:59). This blog post provides some solutions to this challenge. Please don’t read on if you intend to complete the challenge on your own.
Task 1: Maximum Ones
You are given a m x n binary matrix.
Write a script to return the row number containing maximum ones, in case of more than one rows then return smallest row number.
Example 1
Input: $matrix = [ [0, 1],
[1, 0],
]
Output: 1
Row 1 and Row 2 have the same number of ones, so return row 1.
Just me and Graham this week.
builtin::nan needs better documentation on the kind of NaN it provides.
- We discussed lots about
builtin and lexical imports, and how to handle a few odd cornercases.
- Perl 5.39.7 is now out; we need to work out the schedule for the final few devel releases and the real thing in May.
The Perl and Raku Foundation is thrilled to announce that the FOSDEM
organising team has accepted our proposal to set up a DevRoom on
Saturday, February 3rd 2024. It has been quite a few years since the
last Perl DevRoom at FOSDEM.
Historically, they have always been well attended and packed.
Time for an Update
Since last time, a lot has happened, and TPRF is excited to help create
this venue for sharing news with developers from Europe and across the
globe. Many FOSDEM visitors have a background using Perl, but may have
missed out on recent developments.
Larry Wall himself was a guest speaker at FOSDEM in 2015 to announce
Perl 6, which was later renamed to Raku. Much has happened since then,
and there is lots to share!
Participation