in reply to who can help me for a very interesting perl program
The $hash is returned from do, i.e. it gets assigned to $ref->{$basename}. It goes to the queue, too, from where it gets shifted and extracted to $ref in a future iteration.
($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: who can help me for a very interesting perl program
by Anonymous Monk on May 03, 2016 at 08:26 UTC | |
by choroba (Cardinal) on May 03, 2016 at 08:32 UTC | |
by Anonymous Monk on May 03, 2016 at 09:04 UTC | |
by Athanasius (Archbishop) on May 04, 2016 at 04:39 UTC | |
by Anonymous Monk on May 04, 2016 at 07:55 UTC | |
|
In Section
Seekers of Perl Wisdom