Perl: the Markov chain saw PerlMonks

comment on

 Need Help??
```#!perl
use warnings; use strict; use integer;
for(my@a=(
0,42,0,0,0,0,0,0,-198,0,0,0,1,-1,-10,-14,64,-64,6,6,6,7,5,5,5,6,32,32,
+5,17,32,
2,0,188,5,5,5,8,9,9,9,5,49,49,49,8,7,7,7,0,8,12,58,58,7,11,58,2,0,189,
+1,190,
10,10,10,15,5,5,5,7,5,7,7,7,7,5,7,5,10,12,5,5,88,88,5,10,88,2,0,197,96
+,96,7,
11,96,2,0,191,5,5,106,106,5,7,106,2,0,192,115,115,115,9,7,7,7,0,4,4,4,
+7,3,12,
3,3,9,12,6,6,6,8,5,5,5,9,140,140,5,6,140,2,0,194,149,149,149,8,7,7,7,0
+,6,6,6,
7,5,5,5,17,164,164,5,6,164,2,0,195,4,4,4,14,3,12,3,3,1,193,4,4,4,7,3,1
+2,3,3,8,
12,1,196,-28,42,62,56,66,134,34,-10,46,24,
unpack"U*",`cat part3.txt`.v0);
\$a[1];){\$a[2]=-((\$a[\$a[\$a[1]++]]-=\$a[\$a[\$a[1]++]])<0);\$a[3]&&print chr
+\$a[4]}

Update: This would have been better written as

```#!perl
use warnings; use strict; use integer;
for(my@a=(
0,42,0,0,0,0,0,0,-198,0,0,0,1,-1,-10,-14,64,-64,6,6,6,7,5,5,5,6,32,32,
+5,17,32,
2,0,188,5,5,5,8,9,9,9,5,49,49,49,8,7,7,7,0,8,12,58,58,7,11,58,2,0,189,
+1,190,
10,10,10,15,5,5,5,7,5,7,7,7,7,5,7,5,10,12,5,5,88,88,5,10,88,2,0,197,96
+,96,7,
11,96,2,0,191,5,5,106,106,5,7,106,2,0,192,115,115,115,9,7,7,7,0,4,4,4,
+7,3,12,
3,3,9,12,6,6,6,8,5,5,5,9,140,140,5,6,140,2,0,194,149,149,149,8,7,7,7,0
+,6,6,6,
7,5,5,5,17,164,164,5,6,164,2,0,195,4,4,4,14,3,12,3,3,1,193,4,4,4,7,3,1
+2,3,3,8,
12,1,196,-28,42,62,56,66,134,34,-10,46,24,
unpack"U*",`cat part3.txt`.v0);
\$a[1];\$a[3]&&print chr\$a[4]){\$a[2]=-((\$a[\$a[\$a[1]++]]-=\$a[\$a[\$a[1]++]]
+)<0)}

In reply to Re: Pattern matching by ambrus
in thread Pattern matching by Stud_Perl

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or or How to display code and escape characters are good places to start.

Create A New User
Domain Nodelet?
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (2)
As of 2022-05-21 18:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
Do you prefer to work remotely?

Results (77 votes). Check out past polls.

Notices?