On 10 Jan 2002 18:10:20 -0500, [EMAIL PROTECTED] (Michael R. Wolf)
wrote:
>[EMAIL PROTECTED] (Zentara) writes:
>
>> I get it, so "perl" equals 285075 in a base24 number
>> system, with the alphabet as it's units.
>
>24? What's 24? There are _26_ letters in the alphabet! Or
>was "24" a base _11
[EMAIL PROTECTED] (Zentara) writes:
> I get it, so "perl" equals 285075 in a base24 number
> system, with the alphabet as it's units.
24? What's 24? There are _26_ letters in the alphabet! Or
was "24" a base _11_ number? And if so, what extra digit
were you using other than your fingers? :-
> "Zentara" == Zentara <[EMAIL PROTECTED]> writes:
Zentara> I get it, so "perl" equals 285075 in a base24 number system,
Zentara> with the alphabet as it's units.
There are only 24 letters in your alphabet? :)
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
own
addition and subtraction routines so that $a + $b added letters instead of
number (or both letters and numbers).
Rob
-Original Message-
From: zentara [mailto:[EMAIL PROTECTED]]
Sent: Thursday, January 10, 2002 3:51 PM
To: [EMAIL PROTECTED]
Subject: Re: interesting JAPH, how does this
On Thu, 10 Jan 2002 12:11:53 -0500, [EMAIL PROTECTED] (Robert Hanson) wrote:
>You can increment letters just like you increment numbers.
>$x = "a";
>$x++;
>print $x; # prints "b"
>
>And the letter "z" incremented becomes "aa".
>
>$x = "z";
>$x++;
>print $x; # prints "aa"
>
>So here is the script.
A";
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, January 10, 2002 9:47 AM
> To: Hanson, Robert
> Cc: [EMAIL PROTECTED]; 'zentara'
> Subject: RE: interesting JAPH, how does this work?
>
>
>
>
[EMAIL PROTECTED] wrote:
>
> Try this:
>
> #!/opt/local/bin/perl
> #!/usr/bin/perl
> my $A="a";
> for(0..285074){
> $A++;
> print" $A:";
perhaps you should consider NOT printing that 285074 times? would kinda
flood the term :)
> }
> print"\n\n$A\n";
>
> --
Try this:
#!/opt/local/bin/perl
#!/usr/bin/perl
my $A="a";
for(0..285074){
$A++;
print" $A:";
}
print"\n\n$A\n";
--
This reemphasizes a mail I just read from someone on this
list about the need to write "clearly readable" codes.
___
C:\users>perl -e "$A=qq(a);for(0..285074){$A++}print qq($A\n);"
perl
C:\users>perl -e "$A=qq(a);for(0..28){$A++}print qq($A\n);"
ad
C:\users>perl -e "$A=qq(a);for(0..2){$A++}print qq($A\n);"
d
C:\users>perl -e "$A=qq(a);for(0..1){$A++}print qq($A\n);"
c
C:\users>perl -e "$A=qq(a);for(0){$A++}p
quot;a"; # assign "a" to $A.
for(0..285074){$A++;} # increment $A 285,074 times
print"$A\n"; # prints the new value
Rob
-Original Message-
From: zentara [mailto:[EMAIL PROTECTED]]
Sent: Thursday, January 10, 2002 12:01 PM
To: [EMAIL PROTECTED]
Subject: interesting JA
Hi,
I saw this on perlmonks.org.
I can't understand how it works.
Can anyone enlighten me?
#!/usr/bin/perl
my $A="a";
for(0..285074){$A++;}print"$A\n";
11 matches
Mail list logo
