Select Code to Download

#  https://theweeklychallenge.org/blog/perl-weekly-challenge-340/
use v5.12;
use warnings;
...
  } ;
  say "Output: '$str'\n\n";
}

*** Input: abbaca
Remove 'bb' => 'aaca'
Remove 'aa' => 'ca'
...
Remove 'aa' => ''
Output: ''