# Perl Archives

## TWC 195: Special Speedy Frequency

In which count only what we must.

In Raku, Perl, and C {via Perl's Inline::C} .

## TWC 194: Bag Time!

In which analysis speeds, and mis-leads.

## TWC 193: Evens and Oddballs

In which we revisit seventh grade, and sing in the key of "A".

## TWC 192: Frosting a cake without flipping the spatula

In which we refine and refactor past the point of recognition:

``````(  [\+] ( @a X- target )  )».abs.sum
``````

In Raku, Perl, and Rust.

## TWC 189: Saving your Degree by Great Character!

In which we achieve Single Pass and Single Expression, respectively.

Next door to the Haunted Mansion.

## TWC 160: Mystic/Math Balance

In which we pine for The Good Place, while visiting The Bad Place.

## TWC 155: I say Potato, you say Pisano

In which we reach the first plateau of clever, then (unfortunately) stop climbing.

(Still editing)

## TWC Episode 154 - Padawan Missing

In which we search for a needle in a lendee
(or maybe a chatchka in a haystack),
and delight in some lazy CPAN comfort.

## TWC 150: bAbAbbAb and a few Composites

In which we see Leonardo outside his native Nums, and that the World is not made of Ones.

(Placeholder; still editing)

# TWC Task #2 - Square-free Integer

## TWC 149: Limited Fibs, and Bases of Unusual Size

(Currently editing)

In which we see that you don't need all the Fibs, and have trouble turning 21.

# TWC Task #1 - Fibonacci Digit Sum

Given an input \$N, generate the first \$N numbers for which the sum of their digits is a Fibonacci number.

(i.e. Generate OEIS A028840)

# TWC Task #2 - Largest Square

(i.e. Generate OEIS A287298)

Given a number base, derive the largest perfect square with no repeated digits and return it as a string. (For base>10, use ‘A’..‘Z’.)