SOLUTION of entry Paris.pm-1.1 for OPC5 category one.
Encore une obfuscation de Paris.pm canal assombri!

This program generates anagrams using /usr/dict/words. With this
cabalistic method, I also prove that Jon is a perl driven
cyber-incarnation of the beast. No less!

The Tk-based interface proposes indeed "the Perl journal" 
as the default string. 

The big picture: 

we first create an array of words from /usr/dict/words that are
contained in the string "the perl journal".  At each level of
the recursion, we try each word of the array.  Each time a word
matches (that is, we can remove its letters from the target strinr) we
go deeper in the recursion.  The recursion ends when we have
suppressed all the string letters; that means we have a word sequence 
that is an anagram.

The details:

A string is used to represent the letters of the string not yet used.
It is constituted of its letters sorted in alphabetic order.
Each letter is suffixed with as many dashes as instances of the letter.
For "the perl jounal" it gives the target string: a-e--h-j-l--n-o-p-r--t-u-

We use the same scheme to generate patterns from words.  We
append each letter with ".*" to match the letters in the
string that are not present in the word.  There is a match if each
letter of the word is present in the string with more instances in the
string than in the word.

  A candidate word:                                   atoll 
  Its associated regexp:                              a-.*l--.*o-.*t-.*
  The lower cased string with chaff removed:          theperljournal
  The target string that must be matched:             a-e--h-j-l--n-o-p-r--t-u-
  The target string with the "atoll" removed:         e--h-j-n-p-r--u-

Verify that  "the perl journal" contains atoll
print  "a-e--h-j-l--n-o-p-r--t-u-" =~ m/a-.*l--.*o-.*t-.*/'

Once we got a match, we "remove the word" from the target
string. Here, regexps are interesting in their own right: we have
look-behind (?<=$1) , iterated match m//g and look-ahead combined with
use of a naked right anchor in an alternation (?=(\w|$)).

$string =~ s/(?<=$1)$2// while $regexp =~  m/(.)(-+)\.*/g   # suppress appropriate dashes                 => ae--h-j-ln-op-r--tu-
$string =~ s/(\w+)(?=(\w|$))//g;                            # remove the letters with no more dash        => e--h-j-n-p-r--u-


Applying this cabalistic  method to "the Perl journal" reveals Jon's
hidden evil nature.  Jon Jekyll is the O'Reilly CTO, perl journal
editor, organizer of cool contests. But Jon Hyde is a Perl driven
sexed cyborg on a mission to Saturn [1]. Don't get in the way!

  ultra re: help! Jon!
  the ruler pal: Jon
  true perl Jon Hal
  ultra perl he-Jon
  repel Jon Hal rut!!
  Jon: rut, rape, hell

A treat:
  perl -e '@b=@a=@ARGV;grep{s/\W//g;$=join"",sort split//,lc }@a;  print$b[0],($a[0]eq$a[1]?" est":" n'est pas")," un anagramme of ",$b[1],"\n"' "Alcofribas Nasier" "Francois Rabelais"

Footnotes: 

[1]  ...or Jupiter depending if your are a Kubric or a Clarck fan
