1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
=================================================
Perl 5 README file for the EPOC operating system.
==================================================
Olaf Flebbe <o.flebbe@gmx.de>
http://www.linuxstart.com/~oflebbe/perl/perl.html
1999-11-01
Introduction
------------
This is a port of Perl version 5.005_62 to EPOC.
There are many features left out, because of restrictions of the POSIX
support in the SDK.
Installation/Usage
------------------
You will need ~4MB free space in order to run perl.
Install perl.sis on the EPOC machine (most likely a PSION Series
5). If you do not know how to do that, you are on your own. You may
have to use a CF Card in order to work with perl. The perl debugger
uses more then 1.5 MB additional RAM. The heap is limited to 2 MB.
Perl itself and its standard library are using 1.7MB disk space. I
left out UTF support and modules which will not work with this
version. (For details look into epoc/createpkg.pl).
Copy eshell.exe to the same location as perl. Start eshell.exe with a
double click.
Now you can enter: perl -de 0 in order to run the perl debugger. If
you are leaving perl, you have to switch back manually to eshell.exe
(With Ctrl-System or the button in the upper right corner of the
System screen.) When perl is running, you will see a task with the
name STDOUT in the task list.
You can redirect the output with the UNIX bourne shell syntax (this is
built into perl rather then eshell) For instance the following command
line will run the script test.pl with the output redirected to
stdout_file, the errors to stderr_file and input from stdin_file.
perl test.pl >stdout_file <stdin_file 2>stderr_file
Alternativly you can use 2>&1 in order to add the standard error output to
stdout.
Pathnames to executables in eshell.exe have to be written with
backslashes, file arguments to perl with slashes. The default drive of
perl is the same as the drive perl.exe is located on, the default path
is the path perl.exe is / (???).
i.e. command lines look a little bit funny:
D:\perl.exe C:/test.pl >C:/output.txt
In order to use Getopt::Long you have to autosplit this module by hand: run
\perl.exe \autosplit.pl in order to create the necessary files.
You may have a problem to create perl scripts. A cumbersome workaround
is to use the OPL Editor and exporting to text.
Problems
--------
The following known problems exist:
1) no support for system, backquoting, pipes etc. One cannot exec a
different process.
2) no signals, kill, alarm. Do not try to use them. This may be
impossible to implement on EPOC.
3) select is missing.
4) binmode does not exist. (No CR LF to LF translation for text files)
5) Only a stub Config.pm
6) EPOC does not handle the notion of current drive and current
directory very well (i.e. not at all, but it tries hard to emulate
one)
7) sockets may hardly of any use.
8) You need the shell eshell.exe in order to run perl.exe and supply
it with arguments.
Compiling Perl 5 on the EPOC cross compiling envionment.
--------------------------------------------------------
0. You will need the C++ SDK from
http://developer.epocworld.com/. Install it on a separate
drive.
1. Get the Perl sources from your nearest CPAN site.
Unpack the sources of perl5.005_60 in the epoc development drive.
2. Copy all files in the directory perl5.005_60/epoc to perl5.005_60.
3. Check the perl.mmp file: It should have the correct locations for
project und subproject (see step 1)
4. Change to the EPOC development drive and run
makmake perl marm
nmake -f perl.marm
makesis perl.pkg perl5.005.sis
5. Beam the perl5.005.sis to the Psion5, install and enjoy!
You can use epoc\createpkg.pl to generate a new perl.pkg file.
Wish List
---------
- Implement an OPX to get rid of eshell.exe.
- Implement system(), in order to run the tests.
- Implement getprotcolbyname() and relatives.
Support Status
--------------
I'm offering this port "as is". You can ask me questions, but I can't
guarantee I'll be able to answer them; I don't know much about Perl
internals myself;
|