Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sdd.hp.com!zaphod.mps.ohio-state.edu!rpi!uupsi!cmcl2!cmcl2
From: lixj@acf4.NYU.EDU (Xiaojian Li)
Newsgroups: comp.lang.perl
Subject: Perl and Patch for AIX3.1, my experience
Message-ID: <9102012349.AA29050@acf4.NYU.EDU>
Date: 1 Feb 91 23:49:30 GMT
Lines: 59

From lixj@acf4.NYU.EDU  Fri Feb  1 18:49:36 1991
Received: from ACF4.NYU.EDU by cmcl2.NYU.EDU (5.61/1.34)
	id AA16408; Fri, 1 Feb 91 18:49:36 -0500
Received: by acf4.NYU.EDU (5.61/1.34)
	id AA29050; Fri, 1 Feb 91 18:49:30 -0500
Date: Fri, 1 Feb 91 18:49:30 -0500
From: lixj@acf4.NYU.EDU (Xiaojian Li)
Message-Id: <9102012349.AA29050@acf4.NYU.EDU>
To: rnews@cmcl2.NYU.EDU, rosenblg@acf4.NYU.EDU

Relay-Version: version nyu B notes v1.6.1 1/11/90; site acf4.NYU.EDU
From: lixj@acf4.NYU.EDU (Xiaojian Li)
Date: 1 Feb 91 18:49 EST
Date-Received: 1 Feb 91 18:49 EST
Subject: Perl and Patch for AIX3.1, my experience
Message-ID: <2540003@acf4.NYU.EDU>
Path: acf4!lixj
Newsgroups: comp.lang.perl
Posting-Version: version nyu B notes v1.6.1 1/11/90; site acf4.NYU.EDU
Organization: New York University

Dear Netters, here is some of my experience with "patch" and "perl" on
IBM6000/320.

   apparently "xlc" is too strict to the packages, it complained
redeclaration of sprintf. Ok, I am smart enough to comment out lines like

  int sprintf();

and use bsdcc(which is just xlc with many macros defined and libraries called
in different order). This worked! Perl failed one official test:
------------------------------------------------
#!./perl
print (mkdir('blurfl',0777) ? "ok 1\n" : "not ok 1\n");
print (mkdir('blurfl',0777) ? "not ok 2\n" : "ok 2\n");
print ($! =~ /exists/ ? "ok 3\n" : "not ok 3\n");
print $!, "\n";
print (-d 'blurfl' ? "ok 4\n" : "not ok 4\n");
print (rmdir('blurfl') ? "ok 5\n" : "not ok 5\n");
print (rmdir('blurfl') ? "not ok 6\n" : "ok 6\n");
print ($! =~ /such|exist/ ? "ok 7\n" : "not ok 7\n");
print $!, "\n";

ok 1
ok 2
not ok 3
Do not specify an existing file.
ok 4
ok 5
ok 6
ok 7
A file or directory in the path name does not exist.
------------------------------------------------
I guess I can not call it a fail because IBM uses a different English.

Hope this would help those who want to install perl and patch under AIX3.1
Have fun.

Xiaojian