Perl Weekly Challenge - 027

Sunday, Sep 22, 2019| Tags: Perl, Raku


With great pleasure, we announce Roger Bell West as the winner of Perl Weekly Challenge - 026. Congratulations Roger, you should soon hear from Perl Careers about your reward. For rest of the participants, I would say Good Luck for next time. Keep sending in your solutions and share your knowledge with each other.


Here is the recap of last week challenge.


Please checkout Perl solutions review of the Perl Weekly Challenge - 025 by Kian-Meng Ang.


Please checkout Raku solutions review of the Perl Weekly Challenge - 025 by Laurent Rosenfeld.

  1. Longest Pokémon Sequence

  2. Implementation of the Chaocipher Algorithm


Please take a look at the charts showing interesting data.

I would like to thank everyone for their valuable suggestions. Please do share your experience with us.


Markus Holzer, an experienced Perl hacker from Germany joined the team.

Check out current team members.


Watch this space for contributions in language other than Perl5 and Perl6.

Task #1

Write a script to find the intersection of two straight lines. The co-ordinates of the two lines should be provided as command line parameter. For example:

The two ends of Line 1 are represented as co-ordinates (a,b) and (c,d).

The two ends of Line 2 are represented as co-ordinates (p,q) and (r,s).

The script should print the co-ordinates of point of intersection of the above two lines.

Task #2

Write a script that allows you to capture/display historical data. It could be an object or a scalar. For example

my $x = 10; $x = 20; $x -= 5;

After the above operations, it should list $x historical value in order.

Last date to submit the solution 23:59 (UK Time) Sunday 29th September 2019.


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

Contact with me