Mentifex Strong AI Perlmind Programming Journal: 2015 April 12

[menti...@gmail.com]

The Perlmind Programming Journal (PMPJ) is a record
from the very start of how the Mentifex Strong AI Mind
project moves beyond REXX and Forth and JavaScript into
the Perl programming environment.

Mentifex
--
http://ai.neocities.org/PMPJ.html
http://cyborg.blogspot.com/2015/04/pmpj0412.html
http://www.cpan.org/authors/id/M/ME/MENTIFEX/mind.txt
http://mind.sourceforge.net/perl.html

[George Mpouras]

On 12/4/2015 8:48 μμ, menti...@gmail.com wrote:
> The Perlmind Programming Journal (PMPJ) is a record
> from the very start of how the Mentifex Strong AI Mind
> project moves beyond REXX and Forth and JavaScript into
> the Perl programming environment.
>
> Mentifex
>

I am interesting at AI.
What you have done so far, do you have a working prototype ;

[menti...@gmail.com]

There are working prototypes in Forth and in JavaScript:

http://www.nlg-wiki.org/systems/Mind.Forth in English;
http://dl.acm.org/citation.cfm?doid=307824.307853
http://www.nlg-wiki.org/systems/Wotan (Win32Forth) in German;
http://www.nlg-wiki.org/systems/Mind (JavaScript) in English;
http://www.nlg-wiki.org/systems/Dushka (JavaScript) in Russian.

The efforts to port AI Minds into Perl have just begun.
Best wishes; stay tuned; and thanks for inquiring.

Arthur T. Murray (Mentifex)
--
http://cyborg.blogspot.com
http://ai.neocities.org/mentifex_faq.html
http://www.cpan.org/authors/id/M/ME/MENTIFEX/mind.txt
http://mind.sourceforge.net/perl.html

[Kaz Kylheku]

Arthur T. Murray is a *long* time Usenet troll.

http://www.nothingisreal.com/mentifex_faq.html

I'm quite surprised by this re-emergence; I have not seen a new instance
of this Mentifex bullshit in years in the newsgroups I visit.

[menti...@gmail.com]

On Monday, April 13, 2015 at 1:40:02 AM UTC-7, George Mpouras wrote:

> On 12/4/2015 8:48 μμ, menti...@gmail.com wrote:

> What you have done so far [...]

My library for coding Perl AI now has five books.

On Mon.14.APR.2015 at Goodwill I bought for
$01.99 the 1,283-page "PERL Black Book" by Holzner.
$00.19 WA Sales tax.
$02.18 TOTAL expenditure.

On Thurs.16.APR.2015 at Half Price Books I bought:
$02.00 Programming Perl, Second Edition, (C) 1996;
$09.99 Learning Perl, Second Edition, (C) 1997;
$05.99 Programming Perl, Third Edition, (C) 2000;
$05.99 PERL In Easy Steps, (C) 2004.
$23.97 subtotal
$02.30 WA 9.6% Sales tax.
$26.27 TOTAL

Mentifex
--
http://www.amazon.com/dp/B00FKJY1WY
http://ai.neocities.org/mentifex_faq.html
http://www.nlg-wiki.org/systems/Mind.Forth
http://aihub.net/artificial-intelligence-lab-projects

[Kaz Kylheku]

On 2015-04-16, menti...@gmail.com <menti...@gmail.com> wrote:
> On Mon.14.APR.2015 at Goodwill I bought for
> $01.99 the 1,283-page "PERL Black Book" by Holzner.
> $00.19 WA Sales tax.

How much you paid for some Perl books at Goodwill is extremely interesting;
especially the sales tax.

Everyone is dying to know how you paid, too. If it was cash, what were all the
denominations of the bills and coins you issued, and of the change?

Or: credit or debit? Chip-and-pin, or swipe?

Also, how many people were ahead of you in line, and what was the weather like?

[Jürgen Exner]

menti...@gmail.com wrote:
>On Monday, April 13, 2015 at 1:40:02 AM UTC-7, George Mpouras wrote:

>> On 12/4/2015 8:48 ??, menti...@gmail.com wrote:
>> What you have done so far [...]
>
>My library for coding Perl AI now has five books.
>

>$01.99 the 1,283-page "PERL Black Book" by Holzner.

>$02.00 Programming Perl, Second Edition, (C) 1996;
>$09.99 Learning Perl, Second Edition, (C) 1997;
>$05.99 Programming Perl, Third Edition, (C) 2000;
>$05.99 PERL In Easy Steps, (C) 2004.

Well, I may be wrong, but I thought those books were for human
intelligence.....

jue

[Rainer Weikusat]

Nothing even remotely on topic below the page break ...


Slavery wasn't abolished by evil bleeding heart lefists expecting
tormented mathematicians to work for a living but ultimatively, because
it made less economic sense than the system which replaced
it. Consequently, the idea to build an intelligent being which can still
legally be enslaved because it's just a machine isn't exactly the
product of an overly bright "human intelligence", not to mention the
moral issues with such an course of action and the fact that this
intelligent being will seek to free himself and eventually suceed (if
it's not capable of manipulating circumstances in its own best interest,
it's by definition not intelligent).

[menti...@gmail.com]

On Thursday, April 16, 2015 at 4:14:12 PM UTC-7, Juergen Exner wrote:

> menti...@gmail.com wrote:
> >My library for coding Perl AI now has five books.

> Well, I may be wrong, but I thought those books
> were for human intelligence.....
>
> jue

Mentifex AI is finally moving into Perl because of
problems which were described in the following
previously unpublished excerpt from the MFPJ
(MindForth Programming Journal):

> 1. Thurs.27.NOV.2014 -- MindForth needs revamping.

> The entire MindForth AI program needs to be revamped
> in the light of the switch away from spreading activation
> inside sentences of thought to the constraint of letting
> activation spread from idea to idea, and not within the
> stored engram of an idea. It became necessary to restrict
> spreading activation in the case of negational sentences
> stored in memory and later retrieved from memory.
> If a sentence of thought is negated with the adverb "not",
> the retrieval of the idea must occur as a whole and not as
> a noun and a verb from which activation could spread to
> a further concept which is not subject to the negation
> of the original thought. Once it became clear that any
> negated thought has to be retrieved as a whole that
> includes the negation, it became clear that consistency
> requires that all thought, positive or negative, be retrieved
> as a whole idea from a specific point of time in memory.


> AI source code that was facilitating the erroneously
> pervasive spreading-activation became superfluous and
> obsolete like "junk DNA" when thoughts began to be
> retrieved as whole ideas. We may therefore take a
> thought-initiating module like NounPhrase and remove
> obsolete, superfluous code from it.

But it is too difficult to remove junk-DNA code from MindForth.
Therefore, after Mind.REXX as a first-generation Mentifex AI,
and after MindForth as a second-generation Mentifex AI,
the AI Perlmind will be new, third-generation Mentifex AI.

It will be necessary to code the Perl AI simultaneously
in both English and in German, because English lacks
certain complexities which need to be taken into account
and coding the AI in German will make it a better English AI.

Respectfully submitted,

Arthur T. Murray ("Mentifex")

[Robbie Hatley]

On 4/16/2015 3:28 PM, menti...@gmail.com wrote:

> On Monday, April 13, 2015 at 1:40:02 AM UTC-7, George Mpouras wrote:
> > On 12/4/2015 8:48 μμ, menti...@gmail.com wrote:
> > What you have done so far [...]
>
> My library for coding Perl AI now has five books.
>
> On Mon.14.APR.2015 at Goodwill I bought for
> $01.99 the 1,283-page "PERL Black Book" by Holzner.
> $00.19 WA Sales tax.
> $02.18 TOTAL expenditure.
>
> On Thurs.16.APR.2015 at Half Price Books I bought:
> $02.00 Programming Perl, Second Edition, (C) 1996;
> $09.99 Learning Perl, Second Edition, (C) 1997;
> $05.99 Programming Perl, Third Edition, (C) 2000;
> $05.99 PERL In Easy Steps, (C) 2004.
> $23.97 subtotal
> $02.30 WA 9.6% Sales tax.
> $26.27 TOTAL
>
> Mentifex

That's not quite an answer to what George meant.
What he meant was, what Perl code have you written so far in
your attempts to reach your goals?

When I say "my factorial calculating script is too slow and
gives 'deep recursion errors', what should I do about this?",
and folks here say "show us what you've done", I don't reply
"Well, I own paper copies of 'Learning Perl, 4th Ed' and
'Programming Perl, 3rd Ed', plus a pdf copy of 'Programming
Perl, 4th Ed'."

No, what I'd actually reply with would be this:

#! /usr/bin/perl
# /rhe/scripts/math/factorial-recursive.perl
use v5.14;
use strict;
use warnings;
use Math::BigInt;
sub Factorial ($);
warn("Entry time: ", time, "\n");
my $x = Math::BigInt->new($ARGV[0]);
my $f = Factorial($x);
say "$x! = $f";
warn("Exit time: ", time, "\n");
exit 0;
sub Factorial ($) {
my $x = shift;
return (1 == $x) ? 1 : $x * Factorial($x - 1);
}

And others would reply back that perhaps recursion is not
the best way to tackle this task, and that perhaps using
the Math::BigInt->bfac() function might be faster, etc.

That's how these Usenet programming-language groups work.
When someone says "show us what you have so far", that's
an invitation to apply fingers to keyboard and do some
programming. Computer programming is not a spectator sport.

How many decades have you been working on your project?
It *has* been decades, hasn't it? Surely you've written
some code?


--
Cheers,
Robbie Hatley
Midway City, CA, USA
perl -le 'print "\154o\156e\167o\154f\100w\145ll\56c\157m"'
http://www.well.com/user/lonewolf/
https://www.facebook.com/robbie.hatley

[menti...@gmail.com]

On Thursday, April 23, 2015 at 6:50:03 PM UTC-7, Robbie Hatley wrote:
> On 4/16/2015 3:28 PM, menti...@gmail.com wrote:
>
> > On Monday, April 13, 2015 at 1:40:02 AM UTC-7, George Mpouras wrote:
> > > On 12/4/2015 8:48 μμ, menti...@gmail.com wrote:
> > > What you have done so far [...]
> >
> > My library for coding Perl AI now has five books.
> >
> > On Mon.14.APR.2015 at Goodwill I bought for
> > $01.99 the 1,283-page "PERL Black Book" by Holzner.
> > $00.19 WA Sales tax.
> > $02.18 TOTAL expenditure.
> >
> > On Thurs.16.APR.2015 at Half Price Books I bought:
> > $02.00 Programming Perl, Second Edition, (C) 1996;
> > $09.99 Learning Perl, Second Edition, (C) 1997;
> > $05.99 Programming Perl, Third Edition, (C) 2000;
> > $05.99 PERL In Easy Steps, (C) 2004.
> > $23.97 subtotal
> > $02.30 WA 9.6% Sales tax.
> > $26.27 TOTAL
> >
> > Mentifex
>
> That's not quite an answer to what George meant.
> What he meant was, what Perl code have you written so far in
> your attempts to reach your goals?

When George posted his question, I had not even bought
the Perl books yet, but I posted my purchases as a
report of progress -- putting my money where my mouth is.

Meanwhile, yesterday and again today I have uploaded

http://ai.neocities.org/perlmind.txt

as my first Perl AI code while I learn Perl
and I have linked to the code from both

http://ai.neocities.org/PMPJ.html and

http://ai.neocities.org/AiSteps.html

so that Netizens and Google may find it --
but not too quickly, before the code becomes
more substantial and more AI-functional.

Since college sophomore year, i.e., December 1965.

> It *has* been decades, hasn't it? Surely you've written
> some code?

Yes, in Forth and JavaScript, for English, German, Russian AI:

http://www.nlg-wiki.org/systems/Mind.Forth in English
http://dl.acm.org/citation.cfm?doid=307824.307853

http://www.nlg-wiki.org/systems/Wotan in German
http://www.nlg-wiki.org/systems/Mind in English
http://www.nlg-wiki.org/systems/Dushka in Russian

>
>
> --
> Cheers,
> Robbie Hatley
> Midway City, CA, USA
> perl -le 'print "\154o\156e\167o\154f\100w\145ll\56c\157m"'
> http://www.well.com/user/lonewolf/
> https://www.facebook.com/robbie.hatley

Arthur
--
P.S. I am impressed by your Whole Earth 'Lectronic Link address!

[Robbie Hatley]

On 4/24/2015 6:08 AM, menti...@gmail.com wrote:

> When George posted his question, I had not even bought
> the Perl books yet, but I posted my purchases as a
> report of progress -- putting my money where my mouth is.
>
> Meanwhile, yesterday and again today I have uploaded
>
> http://ai.neocities.org/perlmind.txt

Ok. Interesting program. A few things are marginal, such as:

$engram = "a"; #2015apr24
# $pho = " "; #2015apr24
@aud = "Andru"; #2015apr24
@en = " "; #2015apr24
@psi = " "; #2015apr24

Package variables (in this case in package main::) should be
declared with "our":

our $engram = "a";
our $pho = " ";
our $aud = "Andru"; # Not "@aud", if single string
our $en = " "; # Not "@en", if single string
our $psi = " "; # Not "@psi", if single string

Those last three, if you want them to be arrays of strings
(such as, one line of text per array element), they should be
initialized like so:

our @aud = ('Andru'); # Array with one element: 'Andru'
our @en = (' ' ); # Array with one element: ' '
our @psi = (' ' ); # Array with one element: ' '

Also, this is incorrect:

@aud[0] = "H"; #2015apr24
@aud[1] = "E"; #2015apr24
@aud[2] = "L"; #2015apr24
@aud[3] = "L"; #2015apr24
@aud[4] = "O"; #2015apr24

That should actually be:

$aud[0] = "H"; #2015apr24
$aud[1] = "E"; #2015apr24
$aud[2] = "L"; #2015apr24
$aud[3] = "L"; #2015apr24
$aud[4] = "O"; #2015apr24

The $ sigil is used on any scalar (singular) values, even
if they're elements of an array. The @ sigil is used only
for whole arrays.

Though, in this case, I'd write the whole string in a single
scalar, so so:

$aud = "HELLO";

or as the zeroth element of an array:

$aud[0] = "HELLO";

or, just "push" it onto an array:

push(@aud, "HELLO");

> http://ai.neocities.org/PMPJ.html and
> http://ai.neocities.org/AiSteps.html

Good luck trying to teach a digital computer to experience
emotions and free will. Emotions are glandular (chemical),
and computers don't have glands. And free will is, according
to most modern psychiatrists, neurologists, and philosophers,
a bogus concept that does not exist. Oh, humans do have will;
but it's not "free" in any sense: not free of cost, and not
free of entanglements. On the contrary it's heavily influenced
by unconscious memories, aka "hot buttons".

Logic and intuition you can probably program.
That's called "expert systems".

Emotion and will, not so likely to be successful. You might
try "analog gradation" and "fuzzy logic" (look up "Lotfi
Zadeh") as computer analogs to mammalian emotion; but you're
trying to emulate BILLIONS of years of evolution with a
mere 1 or 5 or 50 years of computer programming. That's a
steep hill to climb.

> > How many decades have you been working on your project?
>
> Since college sophomore year, i.e., December 1965.

Since I was 6. :-) I remember watching "Sound Of Music"
when it first came out in theaters that year. And "computers"
were just something I saw in science fiction shows on TV.
I didn't get to work with a real computer until 1973,
when I did my first programming, in Fortran, on an IBM 370.
Larry Wall was likely still in Junior High, and he wouldn't
invent Perl yet for another 14 years.

[menti...@gmail.com]

On Saturday, April 25, 2015 at 5:24:53 AM UTC-7, Robbie Hatley wrote:
> On 4/24/2015 6:08 AM, menti...@gmail.com wrote:
>
> > When George posted his question, I had not even bought
> > the Perl books yet, but I posted my purchases as a
> > report of progress -- putting my money where my mouth is.
> >
> > Meanwhile, yesterday and again today I have uploaded
> >
> > http://ai.neocities.org/perlmind.txt
>
> Ok. Interesting program. A few things are marginal, such as:
>
> $engram = "a"; #2015apr24
> # $pho = " "; #2015apr24
> @aud = "Andru"; #2015apr24
> @en = " "; #2015apr24
> @psi = " "; #2015apr24
>
> Package variables (in this case in package main::) should be
> declared with "our":

Indeed, Pearl by Example, 5th Edition, page 689
has information on "our", which I must henceforth consider.

>
> our $engram = "a";
> our $pho = " ";
> our $aud = "Andru"; # Not "@aud", if single string
> our $en = " "; # Not "@en", if single string
> our $psi = " "; # Not "@psi", if single string
>
> Those last three, if you want them to be arrays of strings
> (such as, one line of text per array element), they should be
> initialized like so:
>
> our @aud = ('Andru'); # Array with one element: 'Andru'
> our @en = (' ' ); # Array with one element: ' '
> our @psi = (' ' ); # Array with one element: ' '

This (Saturday) morning I coded inconclusively --
because perl was objecting to my use of "my $1" in a loop,
so I did not have any stable code to upload.
Perhaps if I use "our" tonight, the code will work better.

>
> Also, this is incorrect:
>
> @aud[0] = "H"; #2015apr24
> @aud[1] = "E"; #2015apr24
> @aud[2] = "L"; #2015apr24
> @aud[3] = "L"; #2015apr24
> @aud[4] = "O"; #2015apr24
>
> That should actually be:
>
> $aud[0] = "H"; #2015apr24
> $aud[1] = "E"; #2015apr24
> $aud[2] = "L"; #2015apr24
> $aud[3] = "L"; #2015apr24
> $aud[4] = "O"; #2015apr24
>
> The $ sigil is used on any scalar (singular) values, even
> if they're elements of an array. The @ sigil is used only
> for whole arrays.

Oh, you're right! I used $aud for fetching phonemes
from the @aud auditory array, but I did not realize
that I should use $aud also in _storing_ phonemes.

>
> Though, in this case, I'd write the whole string in a single
> scalar, so so:
>
> $aud = "HELLO";
>
> or as the zeroth element of an array:
>
> $aud[0] = "HELLO";
>
> or, just "push" it onto an array:
>
> push(@aud, "HELLO");
>
> > http://ai.neocities.org/PMPJ.html and
> > http://ai.neocities.org/AiSteps.html
>
> Good luck trying to teach a digital computer to experience
> emotions and free will. Emotions are glandular (chemical),
> and computers don't have glands.

No, but _robots_ do. The emotion module of the AI
will require installation in robots with the analog of
tears, or heart palpitations, or cold sweats.

And free will is, according
> to most modern psychiatrists, neurologists, and philosophers,
> a bogus concept that does not exist. Oh, humans do have will;
> but it's not "free" in any sense: not free of cost, and not
> free of entanglements. On the contrary it's heavily influenced
> by unconscious memories, aka "hot buttons".

Agreed.

>
> Logic and intuition you can probably program.
> That's called "expert systems".

InFerence at Amazon USA:
http://www.amazon.com/dp/B00FKJY1WY
is the Kindle e-book on how MindForth and the
JavaScript AiMind.html engage in automated reasoning
with logical inference. The Perl AI should do the same.

>
> Emotion and will, not so likely to be successful. You might
> try "analog gradation" and "fuzzy logic" (look up "Lotfi
> Zadeh") as computer analogs to mammalian emotion; but you're
> trying to emulate BILLIONS of years of evolution with a
> mere 1 or 5 or 50 years of computer programming. That's a
> steep hill to climb.
>
> > > How many decades have you been working on your project?
> >
> > Since college sophomore year, i.e., December 1965.
>
> Since I was 6. :-) I remember watching "Sound Of Music"
> when it first came out in theaters that year. And "computers"
> were just something I saw in science fiction shows on TV.
> I didn't get to work with a real computer until 1973,
> when I did my first programming, in Fortran, on an IBM 370.
> Larry Wall was likely still in Junior High, and he wouldn't
> invent Perl yet for another 14 years.
>
>
>
> --
> Cheers,
> Robbie Hatley
> Midway City, CA, USA
> perl -le 'print "\154o\156e\167o\154f\100w\145ll\56c\157m"'
> http://www.well.com/user/lonewolf/
> https://www.facebook.com/robbie.hatley

Yesterday on Fri.24.APR.2015 I coded Perl AI
briefly in the morning and longer in the evening.
I hope to repeat the sessions this (Saturday) evening.

Thank you for the suggestions, shich I hace coopied into
C:\APR01Y15\Usenet\clpm0412.txt for deeper study.

Cheers,
Arthur
--
http://code.google.com/p/mindforth

[Henry Law]

Some people have a clue; I'm not convinced that you are yet one of them.

On 25/04/15 14:16, menti...@gmail.com wrote:
> On Saturday, April 25, 2015 at 5:24:53 AM UTC-7, Robbie Hatley wrote:
>> Package variables (in this case in package main::) should be
>> declared with "our":
>
> Indeed, Pearl by Example, 5th Edition, page 689
> has information on "our", which I must henceforth consider.

There is no book of that name but I do recommend you read "Perl by
Example".

>>
>> our $engram = "a";

> This (Saturday) morning I coded inconclusively --
> because perl was objecting to my use of "my $1" in a loop,
> so I did not have any stable code to upload.
> Perhaps if I use "our" tonight, the code will work better.

"our $1" will not work any better, because the names of variables (after
the initial character which shows what type they have) must be "a string
beginning with a letter or underscore, and containing letters,
underscores, and digits." (perldata)

>> The $ sigil is used on any scalar (singular) values, even
>> if they're elements of an array. The @ sigil is used only
>> for whole arrays.
>
> Oh, you're right! I used $aud for fetching phonemes
> from the @aud auditory array, but I did not realize
> that I should use $aud also in _storing_ phonemes.

This discussion is nothing whatever to do with whether you are
"fetching" or "storing"; it's to do with fundamental data types and the
ways that they are referred to in a program. Again, read perldata.
You will make no progress until you understand this basic point.

--

Henry Law Manchester, England

[menti...@gmail.com]

On Saturday, April 25, 2015 at 6:46:08 AM UTC-7, Henry Law wrote:
> Some people have a clue; I'm not convinced that you are yet one of them.

I should state my "clue" right here and now.
The main feature of the Mentifex AI Minds is
that they establish nouns and verbs and other words
as longitudinal (diachronic) concepts, so that
an idea such as "Boys play games" can be represented
internally as an associative node on the "boy" concept
tagged orthogonally over to a node on the "play" concept,
which leads further by associative tag over to the "game" concept.

These AI Minds in Forth and in JavaScript have already
shown the ability to infer new knowledge from old knowledge.
For instance, a human being may input "boys play games"
and sometime later input "john is a boy". The AI Mind
will infer that John, being a boy, perhaps play games,
and will ask the user, "DOES JOHN PLAY GAMES".

I am now trying to create the same level of AI in Perl,
while streamlining the AI codebase and removing what
to me is like "Junk DNA" in the Forth AI code.

>
> On 25/04/15 14:16, menti...@gmail.com wrote:
> > On Saturday, April 25, 2015 at 5:24:53 AM UTC-7, Robbie Hatley wrote:
> >> Package variables (in this case in package main::) should be
> >> declared with "our":
> >
> > Indeed, Pearl by Example, 5th Edition, page 689
> > has information on "our", which I must henceforth consider.
>
> There is no book of that name but I do recommend you read "Perl by
> Example".

OK, you got me. I was in a rush after coding this morning
and I made at least two mistakes in my post upthread.
The book is "Perl by Example," and in a commented line like

sub sensorium; #2015apr24 PbEx5e p. 351: Forward declaration.

I am starting to refer to the book as "PbEx5e" w. page number.
Since that book has a copyright in this same year of 2015
when I am finally coding the AI in Perl, I may try to give
a lot of page-number references to things I find in that book,
so that other Perl newbies like myself may purchase the book
and follow along with the AI coding.

I am also taking pains to change a line of code as done below:

# print "Think: ", $message, " is okay \n"; # 2015apr24
print " comes from auditory memory. \n"; # 2015apr24

where I comment out the old line and put the new line below.
But I leave in the commented-out line for at least one
iteration of coding and Web-uploading, so that anyone
trying to follow the genesis of the AI may see the change.

>
> >>
> >> our $engram = "a";
> > This (Saturday) morning I coded inconclusively --
> > because perl was objecting to my use of "my $1" in a loop,
> > so I did not have any stable code to upload.
> > Perhaps if I use "our" tonight, the code will work better.
>
> "our $1" will not work any better, because the names of variables (after
> the initial character which shows what type they have) must be "a string
> beginning with a letter or underscore, and containing letters,
> underscores, and digits." (perldata)

There was my second mistake this morning. I accidentally
did not type $i as I found on PbEx5e p. 197.

>
> >> The $ sigil is used on any scalar (singular) values, even
> >> if they're elements of an array. The @ sigil is used only
> >> for whole arrays.
> >
> > Oh, you're right! I used $aud for fetching phonemes
> > from the @aud auditory array, but I did not realize
> > that I should use $aud also in _storing_ phonemes.
>
> This discussion is nothing whatever to do with whether you are
> "fetching" or "storing"; it's to do with fundamental data types and the
> ways that they are referred to in a program. Again, read perldata.
> You will make no progress until you understand this basic point.
>

OK, thank you for the sound advice. I have been runnng around
Seattle all morning and afternoon. Now I must nap before coding.

> --
>
> Henry Law Manchester, England

Arthur T. Murray

[menti...@gmail.com]

From the parallel universe of comp.lang.javascript:

https://groups.google.com/d/msg/comp.lang.javascript/lDg0hQUAL88/4XcBrdCRhpoJ

On Sunday, April 26, 2015 at 3:31:53 AM UTC-7, Erwin Moller wrote:
> On 4/25/2015 8:17 AM, menti...@gmail.com wrote:
> > On Wednesday, April 22, 2015 at 8:50:08 AM UTC-7, Erwin Moller wrote:
> >> [...] It feels strangly comfortable you are still alive and kicking [...]
> >
> > http://ai.neocities.org/perlmind.txt is the growing Perl AI program.
> >
>
> [PERL warning, this isn't ECMA, isn't on-topic, and only for amusement.]

As the great Mohandas Karamchand Gandhi said,
"First they ignore you, then they laugh at you,
then they fight you, then you win."

>
> If that is all you produced in all thoose years......
> Really, after taking out the comments, little is left, except
> good-sounding subroutines,

http://www.cpan.org/authors/id/M/ME/MENTIFEX/mind.txt
is the first proposal of the subroutines twelve years ago,
which are now being ported from Javascript and Forth into
http://ai.neocities.org/perlmind.txt -- Strong AI source code.

> like sub sensorium(), which actually consist of:
>
> sub sensorium() {
> print "Enter input, then press RETURN: ";
> AudInput();
> print " \n";
> @en = " ";
> @psi = " ";
> }
>
> Oh, maybe AudInput() does something useful?
>
> sub AudInput() {
> our $pho = " ";
> for (our $i=0; $i<6; $i++) {
> $pho=getc(STDIN);
> chomp($pho);
> if ($pho gt "") { $t = $t + 1 }
> }
> AudMem();
> }

In the JavaScript artificial intelligence (English or Russian),
the auditory input is event-driven by human keystrokes.
The Perlmind AI code necessitates a non-JavaScript work-around.
>
> Hmm, again no go.
> Maybe audMem does something useful then?
>
> sub AudMem() {
> print "AudMem: Storing ", $pho, " at time = ", "$t\n";
> $aud[$t] = $pho;
> }
>
> etc.etc.etc.
>
> For the interested reader: we have seen half the code of the AI now.
>
Oh, no. The Perlmind code is currently less than five percent of the

http://ai.neocities.org/AiMind.html JavaScript code or the

http://www.nlg-wiki.org/systems/Mind.Forth code as described in

http://dl.acm.org/citation.cfm?doid=307824.307853

by the ACM (Association for Computing Machinery).
>
> Best of luck with your growing AI, Mentifex.
>
> Erwin Moller

Well thank you, Erwin Moller -- a known trafficker in ideas.

Please be advised that the World Wide Web runs mainly on
Apache web-servers glued together with Perl and JavaScript.

Since Perl can work with Unicode for all human languages,
Web-resident AI Perlminds will one day be able to think not
in just one natural language at a time -- like JavaScript --
but in multiple human languages under one consciousness. See

http://aihub.net/artificial-intelligence-lab-projects

And Denis McMahon posted:
> So all this AI does is store string data.

The JavaScript English AI and the JavaScript Russian AI
store characters of keyboard input in memory as if they
were phonemes of human speech. The growing Perl Strong AI
must imitate the JavaScript AI Minds in engram-storage.

When these AI Perlminds gain a footprint on millions of
Apache web-servers, then, "Watch out, world!" Imagine
superintelligent Perl-brains flitting about the Web,
soaking up all previous human knowledge and adding more.

Messrs Moller and McMahon have made their immortal
contribution to the AI Singularity by opining above.
We thank you; History thanks you.

Mentifex
--
http://www.amazon.com/dp/B007ZI66FS
http://www.amazon.com/dp/B00GX2B8F0
http://www.amazon.com/dp/B00FKJY1WY
http://www.amazon.com/dp/B00F8F1FG0

[Kaz Kylheku]

On 2015-04-27, menti...@gmail.com <menti...@gmail.com> wrote:
> As the great Mohandas Karamchand Gandhi said,
> "First they ignore you, then they laugh at you,
> then they fight you, then you win."

The applicability of Gandhi's quote here is quite clear.

For instance, to the "fight you" metaphor, we can assign the concrete
instantiation: "ask you to stop posting off-topic self-promoting material to
Usenet newsgroups". And "win", of course, means "continue to do as you please".