Here it is; come and get it!
- Mark B.
PS: Your feedback (positive and negative) is important to me so I can learn
whether or not I missed any porting issues before I submit my MPE patches to
the official developers. If you download it and install it, please e-mail me
saying whether or not it's working for you. Thanks!
Perl/iX for HP 3000 MPE
http://www.cccd.edu/~markb/perlix.html
Perl language for MPE
Last updated October 3, 1997 @ 0000 UTC
---------------------------------------------------------------------------
What's New
* October 3, 1997
o Initial public release.
---------------------------------------------------------------------------
Welcome
This is the official home page for the HP 3000 MPE port of the Perl
scripting language. Check here for the latest news, implemented
functionality, known bugs, to-do list, etc. Status reports about major
milestones will also be posted to the HP3000-L mailing list and its
associated gatewayed newsgroup comp.sys.hp.mpe.
I'm doing this port because I can't live without Perl on the HPUX machines
that I administer for the Coast Community College District, and I want to
have the same power available to me on MPE.
Please send your comments, questions, and bug reports directly to me, Mark
Bixby, by e-mailing to [log in to unmask] Or just post them to HP3000-L. You
can also telephone me at +1 714 438-4647 Monday-Friday 0815-1715 PDT
(1515-0015 UTC).
The platform I'm using to do this port is an HP 3000 969KS200 running
MPE/iX 5.5 and using the gcc compiler from
http://www.interex.org/sources/freeware.html. This port requires MPE/iX 5.5
or later.
---------------------------------------------------------------------------
How to Obtain Perl/iX
1. The Perl/iX binary executable requires that you have already converted
the static NMRL libraries /lib/lib*.a and /usr/lib/lib*.a to the
dynamic NMXL libraries /lib/lib*.sl and /usr/lib/lib*.sl as a part of
the GNUCORE FREEWARE installation process under MPE/iX 5.5 or later.
2. Create the PERL account
3. Download Perl using either FTP.ARPA.SYS or some other client
4. Uncompress and extract
Create the PERL account on your HP 3000
:HELLO MANAGER.SYS
:NEWACCT PERL,MGR;CAP=AM,AL,ND,SF,IA,BA,PH;ACCESS=(R,L,X:ANY;W,A:AC);PASS=somethingsecure
:ALTGROUP PUB.PERL;ACCESS=(R,L,X:ANY;W,A,S:AC)
Download Perl/iX using FTP.ARPA.SYS from your HP 3000 (the preferred
method).....
:HELLO MGR.PERL
:FTP.ARPA.SYS
open ftp.cccd.edu
anonymous
[log in to unmask]
bytestream
cd /pub/mpe
get perl5.004_01.tar.Z /tmp/perl.tar.Z
exit
.....Or download using some other generic web or ftp client (the alternate
method)
Download the following files (make sure that you use "binary mode" or
whatever client feature that is 8-bit clean):
* Perl from http://www.cccd.edu/ftp/pub/mpe/perl5.004_01.tar.Z or
ftp://ftp.cccd.edu/pub/mpe/perl5.004_01.tar.Z
Upload those files to your HP 3000 in an 8-bit clean bytestream manner to:
* /tmp/perl.tar.Z
Then uncompress and extract the distribution (after both download methods)
:TAR.HPBIN.SYS '-xvfopz /tmp/perl.tar.Z'
---------------------------------------------------------------------------
Distribution Contents Highlights
PERL
Perl NMPRG executable. A version-numbered backup copy also exists.
You might wish to "ln -s /usr/local/bin/perl /PERL/PUB/PERL".
lib/
Perl libraries, both core and add-on.
man/
Perl man page documentation.
public_html/
Symbolic link into the HTML documentation within the src/ directory.
If you're running Apache/iX on the same machine, you can browse to
http://hp3k.host.name/~MGR.XNTP/ to read the official xntp
documentation. It's a good idea to read this documentation before you
get started.
src/perl5.004_01
Source code.
src/perl5.004_01/mpeix/
MPE/iX-specific directory, including README (this file).
---------------------------------------------------------------------------
How to Compile Perl/iX
1. cd src/perl5.004_01
2. Read the INSTALL file for the official instructions
3. ./Configure
4. make
5. ./mpeix/relink (NOTE: this step requires that you have already
converted the static NMRL libraries /lib/lib*.a and /usr/lib/lib*.a to
the dynamic NMXL libraries /lib/lib*.sl and /usr/lib/lib*.sl as a part
of the GNUCORE FREEWARE installation process.)
6. make test (expect 14 out of 4137 subtests to fail)
7. make install
8. Optionally create symbolic links that point to the Perl executable,
i.e. ln -s /usr/local/bin/perl /PERL/PUB/PERL
---------------------------------------------------------------------------
Getting Started with Perl/iX
Create your Perl script files with "#!/PERL/PUB/PERL" (or an equivalent
symbolic link) as the first line. Use the chmod command to make sure that
your script has execute permission. Run your script!
If you want to use Perl to write web server CGI scripts, obtain and install
CGI.pm. Build CGI.pm and all other add-on modules below /PERL/PUB/src/.
Be sure to take a look at the CPAN module list. A wide variety of free Perl
software is available.
---------------------------------------------------------------------------
MPE/iX Implementation Considerations
There some minor functionality issues to be aware of when comparing Perl
for Unix (Perl/UX) to Perl/iX:
* MPE gcc/ld doesn't properly support linking NMPRG executables against
NMXL dynamic libraries, so you must manually run mpeix/relink after
each re-build of Perl.
* Perl/iX File::Copy will use MPE's /bin/cp command to copy files by
name in order to preserve file attributes like file code.
* MPE (and thus Perl/iX) lacks support for setgrent(), endgrent(),
setpwent(), endpwent().
* MPE (and thus Perl/iX) lacks support for hard links.
* MPE requires GETPRIVMODE() in order to bind() to ports less than
1024. Perl/iX will call GETPRIVMODE() automatically on your behalf if
you attempt to bind() to these low-numbered ports. Note that the
Perl/iX executable and the PERL account do not normally have CAP=PM,
so if you will be bind()-ing to these privileged ports, you will
manually need to add PM capability as appropriate.
* MPE requires that you bind() to an IP address of zero. Perl/iX
automatically replaces the IP address that you pass to bind() with a
zero.
* If you use Perl/iX fcntl() against a socket it will fail, because MPE
requires that you use sfcntl() instead. Perl/iX does not presently
support sfcntl().
* MPE requires GETPRIVMODE() in order to setuid(). There are too many
calls to setuid() within Perl/iX, so I have not attempted an automatic
GETPRIVMODE() solution similar to bind().
---------------------------------------------------------------------------
Known Bugs Under Investigation
* One of the pragma/locale tests fails.
---------------------------------------------------------------------------
To-Do List
* Squash the above bug(s).
* Submit the MPE patches back to the official Perl distribution.
* Write an MPE XS extension library containing miscellaneous important
MPE functions like GETPRIVMODE(), GETUSERMODE(), and sfcntl().
---------------------------------------------------------------------------
Change History
* September 1997
o Porting begins.
---------------------------------------------------------------------------
Mark Bixby, [log in to unmask]
--
Mark Bixby E-mail: [log in to unmask]
Coast Community College Dist. Web: http://www.cccd.edu/~markb/
District Information Services 1370 Adams Ave, Costa Mesa, CA, USA 92626-5429
Technical Support +1 714 438-4647
"You can tune a file system, but you can't tune a fish." - tunefs(1M)
|
