Re^8: Simplify code in Perl with "unless" conditionnal

by Chaoui05 (Scribe)

on May 30, 2016 at 13:56 UTC ( [id://1164505]=note: print w/replies, xml )

Need Help??

I have got one question . Why did you add 1 in line below:

for my $b2_idx ($b1_idx + 1 .. $#random_array) {
[download]

Lost in translation

Comment on Re^8: Simplify code in Perl with "unless" conditionnal Download Code

Replies are listed 'Best First'.
Re^9: Simplify code in Perl with "unless" conditionnal by choroba (Cardinal) on May 30, 2016 at 14:00 UTC
To prevent an overlooked useless comparison of a screenshot to itself. ($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, [download]	[reply] [d/l]
Re^10: Simplify code in Perl with "unless" conditionnal by Chaoui05 (Scribe) on May 30, 2016 at 14:47 UTC
Perfect , Thanks Lost in translation	[reply]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://1164505]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others about the Monastery: (3)

As of 2024-04-19 20:21 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found