TPF Survey: Marketing and Branding

As announced on TPF news the Marketing committee of TPF have been running a survey "to learn your responses to the ideas about branding, naming and the perceptions of the values concerning the Perl Foundation itself."

This survey will close in just a few hours, so if you have yet to give your feedback please do so asap!

P.s. Please join the more than 4,000 members of "Perl Programmers" on Facebook

BLOG: The Weekly Challenge #073

https://perlweeklychallenge.org/blog/weekly-challenge-073

a Piece of Note on Unicode Encoding for CJK characters (with my simple Caesar encoding script)

d Slhfh ri Qrwh rq Xqlfrgh Hqfrglqj iru FMN fkdudfwhuv

Uhdoob ryhuzkhophg eb zrun lvvxhv dqg wkh orfdo srolwlfv dqg sdqghplfv wkhvh gdbv. Doo duh rxw ri pb frqwuro. Vrphwlphv L kdyh ehhq uhdoob ghsuhvvhg exw kdyh qr rqh wr wdon wr gluhfwob, khqfh L flskhu zkdw L zdqw wr vdb; shrsoh zdqw wr xqghuvwdqg ph fdq kdyh d zdb wr uhdg lw, dqg shrsoh zkr duh douhdgb wluhg ru qhjdwlylvwlf fdq dyrlg pb zrugv. L kdyh zulwwhq d vlpsoh Fdhvdu hqfrghu lq Shuo iru Hqjolvk doskdehwv. Krzhyhu, zkdw L prvw zdqw wr zulwh lv d shuvrqdo Fdhvdu hqfrghu iru wkh whq wkrxvdqgv Fklqhvh fkdudfwhuv lq Xqlfrgh. L kdyh froohfwhg vrph olqnv rq wkh Xqlfrgh zhe hqfrglqj iru FMN(Fklqhvh, Mdsdqhvh, Nruhdq) fkdudfwhuv, iru lqvwdqfh:

Zkdw L zdqw wr frgh wr shuirup lv vrphzkdw vlplodu wr zkdw wkhvh sdjhv gr:


Perl Weekly Challenge 120: Swap Odd/Even Bits and Clock Angle

These are some answers to the Week 120 of the Perl Weekly Challenge organized by Mohammad S. Anwar.

Spoiler Alert: This weekly challenge deadline is due in a couple of days, on July 11, 2021). This blog post offers some solutions to this challenge, please don’t read on if you intend to complete the challenge on your own.

Task 1: Swap Odd/Even Bits

You are given a positive integer $N less than or equal to 255.

Write a script to swap the odd positioned bit with even positioned bit and print the decimal equivalent of the new binary representation.

Example:

Next stable DBD::SQLite will be released at the end of August

DBD::SQLite 1.65_03 (with SQLite 3.32.3) is a release candidate for the next stable DBD::SQLite. There are no big changes, maybe except for the ncrease of the default upper bound on the number of parameters from 999 to 32766 (since SQLite 3.32).

I'll wait for about a month as always, and release 1.66 at the end of August if there's no blocker nor request to wait for more. Thank you for your patience.

Thank you for the support

Inspired by the blog by Gabor Szabo, I am writing this blog to thank all the supporters on Patreon. I would also like to thank Gabor Szabo for the support and guidance. I wouldn't have come this far without your support.

I still can't believe there are people out there willing to support me. Although I knew about Patreon but never had the courage to go public.

I remember my first contribution Test::Excel to CPAN was uploaded on 13th Aug 2010. The second came within 2 months, on 25th Oct 2010, Map::Tube. These 2 are still very close to me out of 85 contributions to CPAN till date. As of today, there 39 maps created using the library by fellow contributors. You can find them on Meta CPAN under the namespace Map::Tube::*.

Looking at the CPAN author page, I find some very useful distributions that I adopted in the past e.g. PDF::Create, XML::XPath and SVG.

Perl Mentoring

In the Perl Programmers Facebook group we have kicked off a Perl Mentoring program. Already more than a dozen experienced Perl people have offered their services to anyone looking to learn more about Perl. It's very convenient that mechanics of volunteering and looking for a mentor are handled by Facebook's mentoring functions. Here's a few thoughts on how to build on that.

For Mentees:

Before reaching out to mentors first pick a specific area of Perl you would like help with. Think up a few ideas for projects that you can complete in 4-6 weeks. With those in mind, review the available mentors looking for skills & experiences that might match your project ideas.

A good project might be: adding a test suite to your module, writing a nagios plugin, a perl weekly challenge, something from pull request club, a bug/feature for your CPAN module, or learning how to create modules from scratch and using Moo.

Perl Weekly Challenge 69: Strobogrammatic Numbers and 0/1 Strings

These are some answers to the Week 69 of the Perl Weekly Challenge organized by Mohammad S. Anwar.

Spoiler Alert: This weekly challenge deadline is due in a couple of days (July 19, 2020). This blog post offers some solutions to this challenge, please don’t read on if you intend to complete the challenge on your own.

Task 1: Strobogrammatic Numbers

A strobogrammatic number is a number that looks the same when looked at upside down.

You are given two positive numbers $A and $B such that 1 <= $A <= $B <= 10^15.

Write a script to print all strobogrammatic numbers between the given two numbers.

Example

Input: $A = 50, $B = 100
Output: 69, 88, 96

The Swiss Raku and Perl Miniconf 2020 Will Not Take Place

Hello from the Swiss Alps, where we have been working from home and avoiding all but essential trips out like so many others over the last few months.

The current situation has led to the cancellation of several community events, including this year's main Raku and Perl conferences in North American and Europe. We have been following the situation closely in Switzerland, and have also decided not to go ahead with our event this year.

We will be following the news, recommendations, and restrictions from The Federal Council and may have a smaller meetup sometime in late Summer/early Autumn. This will be an informal event with no expectation of presentations/workshops/etc. Details will be announced later, and probably at relatively short notice.

Hoping you are safe and well, and that we will meet again in Switzerland next year.

The Swiss Raku and Perl Miniconf organisers.

Monthly Report - July

Survived another month?

God, the year 2020 seems never ending. I just pray it gets over quickly and we start fresh with new year 2021. Unfortunately we have to wait for another 5 months. In the current situation, anything can happen in this period. Please stay safe and avoid unnecessary human contacts.

So what was the main attraction of last month?

Well, quite a few, to begin with, I submitted 12 Pull Requests which is much better than the month before i.e. 9 Pull Requests. I remember there was time when I used to submit at least 50 PR every month. I aim to do at least 1 PR every 2 days i.e. 15 PR every month. Unfortunately I have only managed to do that in January i.e. 22 Pull Requests. I did come close to the target in two months e.g. May (13 Pull Requests) and July (12 Pull Requests). I am going to keep trying hard. Wish me luck.

SanDiego.pm Meeting, Tuesday, July 14th, 2020

The SanDiego.pm Quarterly Meeting is tonight, 7 PM PDT.

Because of the pesky disease that's been spreading, we'll be gathering online. The agenda for tonight is: Normal conversation and seeing how everyone is doing; if there are any questions that need to be answered, we'll do that; followed by jumping into our presentations. We have at least three, though if anybody would like to step up and add another to the mix, please let me know.

Meeting ID: 896 3919 9931 Link to the meeting: https://us02web.zoom.us/j/89639199931

Perl Weekly Challenge 119: Swap Nibbles and Sequence without 1-on-1

These are some answers to the Week 119 of the Perl Weekly Challenge organized by Mohammad S. Anwar.

Spoiler Alert: This weekly challenge deadline is due in a couple of days, on Independence Day (July 4, 2021). This blog post offers some solutions to this challenge, please don’t read on if you intend to complete the challenge on your own.

Task 1: Swap Nibbles

You are given a positive integer $N.

Write a script to swap the two nibbles of the binary representation of the given number and print the decimal number of the new binary representation.

A nibble is a four-bit aggregation, or half an octet.

To keep the task simple, we only allow integer less than or equal to 255.

Example:

Perl Mongers, Unite!

TL;DR:
Promote your next Perl Mongers meeting on The Meetings Page at The pm.org Wiki.

Detail:
pm.org is great for resources, but there's no obvious way to promote your meeting. Not that there needed to be when the meetings were local events, but now, thanks to Covid-19, these meetings are taking place virtually. Why limit yourself to your local members? I am convinced that there are plenty of pockets of mongers that, if united and connected, would make the world realize that Perl Is Not Dead.

If you are a Perl Monger organizer, consider putting your meeting on the wiki page. Let's see just how many active orgs we have!

BLOG: The Weekly Challenge #068

https://perlweeklychallenge.org/blog/weekly-challenge-068

A FIXIT-dive into an old CPAN module

Let’s have a thought experiment. Assume there is an Open Source-licensed Perl module published on CPAN that you care about, and that hasn’t had any updates in a very long time - what are your options?

In this blog post, I’ll take a dive into this problem, and use the Geo::Postcodes::NO module as an example. As of this writing, the module version is 0.31, and it’s most recent release was in September 2006.

Initial assumptions

Before we begin, let’s lay bare the most important assumptions I’m having. Your case may differ, but I think the following ones are pretty safe.

Perl Weekly Challenge 118: Binary Palindrome

These are some answers to the Week 118 of the Perl Weekly Challenge organized by Mohammad S. Anwar.

Spoiler Alert: This weekly challenge deadline is due in a couple of days (June 27, 2021). This blog post offers some solutions to this challenge, please don’t read on if you intend to complete the challenge on your own.

Task 1: Binary Palindrome

You are given a positive integer $N.

Write a script to find out if the binary representation of the given integer is Palindrome. Print 1 if it is otherwise 0.

Example:

Input: $N = 5
Output: 1 as binary representation of 5 is 101 which is Palindrome.

Input: $N = 4
Output: 0 as binary representation of 4 is 100 which is NOT Palindrome.

Binary Palindrome in Raku

Chicago.pm Virtual Meeting: July 23

Chicago.pm will host a virtual Perl Mongers meeting July 23 at 6:30 pm (Chicago time).

Late Weekly challenge 67 #1 only

I wrote some library to make combination in 2013.
I was overwhelming when I found this challenge but I found that it is buggy !!!

I think that finding combination isn't necessarily written using recursive calling.
so this is my first "working" solution.

it is possible to use some list of words (ex) "a", "b", "c" ) instead of number.

It was bound to happen.

While I don't actually work in Perl these days, and not by choice, I still keep an eye on the community. The language is chugging along nicely. Perl 6 is out, so at least that joke has died down, features are being added, some beneficiary, some not. All is well in perland.

Then the news dropped. Perl 7. I was very interested. More so when I realised that it was a rebranding of the latest Perl. First, let me say one thing right off the bat. It's a good call. I'm all for it. In fact, I'm so all for it that I called for it in a post from 2011. At the time I suggested using codenames like Apple and others do, or to rebrand Perl 5.14 (at the time) as Perl 14 like Java did.

Here's why I thought, and still do, that this "rebranding" is a Good Thing:

Perl Weekly Challenge 117: Missing Row and Possible Paths

These are some answers to the Week 117 of the Perl Weekly Challenge organized by Mohammad S. Anwar.

Spoiler Alert: This weekly challenge deadline is due in a couple of days (June 20, 2021). This blog post offers some solutions to this challenge, please don’t read on if you intend to complete the challenge on your own.

Task 1: Missing Row

You are given text file with rows numbered 1-15 in random order but there is a catch one row in missing in the file.

About blogs.perl.org

blogs.perl.org is a common blogging platform for the Perl community. Written in Perl with a graphic design donated by Six Apart, Ltd.