Author: richter
Date: Sat Sep 23 22:09:10 2023
New Revision: 1912497
URL: http://svn.apache.org/viewvc?rev=1912497&view=rev
Log:
Update documentation
Removed:
perl/embperl/trunk/README.v2
Modified:
perl/embperl/trunk/Embperl.pod
perl/embperl/trunk/Embperl/Form/Control/displaylink.pm
perl/embperl/trunk/Embperl/Form/Control/dynlink.pm
perl/embperl/trunk/Embperl/Form/Control/inputlist.pm
perl/embperl/trunk/Embperl/Form/Validate.pm
perl/embperl/trunk/Embperl/Session.pm
perl/embperl/trunk/Embperl/Syntax/Mail.pm
perl/embperl/trunk/Embperl/Syntax/POD.pm
perl/embperl/trunk/EmbperlD.pod
perl/embperl/trunk/Faq.pod
perl/embperl/trunk/INSTALL.pod
perl/embperl/trunk/Intro.pod
perl/embperl/trunk/IntroD.pod
perl/embperl/trunk/IntroEmbperl2.pod
perl/embperl/trunk/IntroEmbperlForm.pod
perl/embperl/trunk/Makefile.PL
perl/embperl/trunk/NEWS.pod
perl/embperl/trunk/README
perl/embperl/trunk/SVN.pod
perl/embperl/trunk/eg/web/config.pl
perl/embperl/trunk/eg/web/content.epl
perl/embperl/trunk/eg/web/donate.htm
perl/embperl/trunk/eg/web/donateD.htm
perl/embperl/trunk/eg/web/epwebapp.pl
perl/embperl/trunk/eg/web/footer.htm
perl/embperl/trunk/eg/web/header.epl
perl/embperl/trunk/eg/web/indexD.htm
perl/embperl/trunk/eg/web/paypal.epl
perl/embperl/trunk/eg/webutil/db.schema
perl/embperl/trunk/eg/x/formvalidation.htm
perl/embperl/trunk/eg/x/input.htm
perl/embperl/trunk/test.pl
perl/embperl/trunk/test/cmp/http.htm
perl/embperl/trunk/test/cmp/pod.asc
perl/embperl/trunk/test/cmp/pod.asc.htm
perl/embperl/trunk/test/cmp/pod.asc.htm.win32
perl/embperl/trunk/test/cmp/pod.asc.win32
perl/embperl/trunk/test/cmp/pod.asc.xalan.htm
perl/embperl/trunk/test/cmp/pod.asc.xalan.htm.win32
perl/embperl/trunk/test/conf/httpd.conf.src
perl/embperl/trunk/test/html/http.htm
perl/embperl/trunk/test/html/mail.htm
perl/embperl/trunk/test/html/mailformto.htm
perl/embperl/trunk/test/html/pod/pod.asc
Modified: perl/embperl/trunk/Embperl.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl.pod (original)
+++ perl/embperl/trunk/Embperl.pod Sat Sep 23 22:09:10 2023
@@ -915,12 +915,12 @@ You can put any http headers you want to
If you set a location header,
Embperl will automatically set the status to 301 (Redirect). Example:
- [- $http_headers_out{'Location'} = "http://www.ecos.de/embperl/"; -]
+ [- $http_headers_out{'Location'} = "https://www.actevy.io/embperl/"; -]
however, it is possible to specify a two element array for Location, the second
element of which gives the desired HTTP status:
- [- $http_headers_out{Location} = [ "http://www.ecos.de/embperl/";, 303 ]; -]
+ [- $http_headers_out{Location} = [ "https://www.actevy.io/embperl/";, 303 ];
-]
Starting with version 1.3.2 all headers with the exception of
"Content-Type" can take multiple values.
@@ -1431,7 +1431,7 @@ Here is an example:
}
# Code ref works too...
- @{$r -> messages} = (\&ecos::I18L::translate::gettext) ;
+ @{$r -> messages} = (\&I18L::translate::gettext) ;
# and gettext is defined as
sub gettext
@@ -1722,24 +1722,11 @@ archive at http://mail-archives.apache.o
=head2 Commerical Support
-You can get free support on the Embperl mailing list (see above). If
-you need commercial support, ecos can provide it for you. We offer:
+You can get free support on the embperl mailing list. If you need
+commercial support for Embperl, please send email to
+richter at embperl dot org.
-=over 4
-
-=item * Consulting and assistance for you and your programmers
-
-=item * Planning of your dynamic website
-
-=item * Creating of parts or a whole website
-
-=item * Fixing bugs in Embperl (also available for mod_perl)
-
-=item * Adding new features
-
-=back
-
-You can reach us via http://www.ecos.de or i...@ecos.de
+You can reach us via https://www.actevy.io or richter at embperl dot org
=head2 How to Support the Development of Embperl
@@ -1776,7 +1763,7 @@ mod_perl http://perl.apac
Embperl http://perl.apache.org/embperl/
-Embperl (german) http://www.ecos.de/embperl/
+Embperl (german) https://www.actevy.io/embperl/
DBIx::Recordset http://search.cpan.org/~grichter/
Modified: perl/embperl/trunk/Embperl/Form/Control/displaylink.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form/Control/displaylink.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form/Control/displaylink.pm (original)
+++ perl/embperl/trunk/Embperl/Form/Control/displaylink.pm Sat Sep 23 22:09:10
2023
@@ -93,7 +93,7 @@ Embperl::Form::Control::displaylink - A
type => 'displaylink',
text => 'blabla',
link => ['ecos', 'bb5000'],
- href => ['http://www.ecos.de', 'http://www.bb5000.info']
+ href => ['https://www.actevy.io', 'http://www.bb5000.info']
}
=head1 DESCRIPTION
Modified: perl/embperl/trunk/Embperl/Form/Control/dynlink.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form/Control/dynlink.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form/Control/dynlink.pm (original)
+++ perl/embperl/trunk/Embperl/Form/Control/dynlink.pm Sat Sep 23 22:09:10 2023
@@ -86,7 +86,7 @@ Embperl::Form::Control::dynlink - A cont
text => 'blabla',
fields =>
[
- { name => 'foo', text => 'Foo', href => 'http://www.ecos.de' },
+ { name => 'foo', text => 'Foo', href => 'https://www.actevy.io' },
{ name => 'bar', text => 'Bar', href => 'http://www.embperl.org', target
=> 'newwindow' },
]
}
Modified: perl/embperl/trunk/Embperl/Form/Control/inputlist.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form/Control/inputlist.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form/Control/inputlist.pm (original)
+++ perl/embperl/trunk/Embperl/Form/Control/inputlist.pm Sat Sep 23 22:09:10
2023
@@ -113,7 +113,7 @@ String to display between the input boxe
=head1 Author
-H. Jung (j...@dev.ecos.de)
+H. Jung
=head1 See Also
Modified: perl/embperl/trunk/Embperl/Form/Validate.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form/Validate.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form/Validate.pm (original)
+++ perl/embperl/trunk/Embperl/Form/Validate.pm Sat Sep 23 22:09:10 2023
@@ -1131,7 +1131,7 @@ only the server-side validation is perfo
<p><hr>
- <small>Embperl (c) 1997-2010 G.Richter / ecos gmbh <a
href="http://www.ecos.de";>www.ecos.de</a></small>
+ <small>Embperl (c) 1997-2010 G.Richter / ecos gmbh <a
href="https://www.actevy.io";>www.acteviy.io</a></small>
</body>
</html>
@@ -1146,6 +1146,6 @@ See also L<Embperl>.
=head1 AUTHOR
-Axel Beckert (a...@ecos.de)
+Axel Beckert
Gerald Richter (richter at embperl dot org)
Modified: perl/embperl/trunk/Embperl/Session.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Session.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Session.pm (original)
+++ perl/embperl/trunk/Embperl/Session.pm Sat Sep 23 22:09:10 2023
@@ -2,7 +2,7 @@
#
# HTML::Embperl::Session
# A bridge between Apache::Session and Embperl's %udat hash
-# Copyright(c) 1999 Gerald Richter (rich...@ecos.de)
+# Copyright(c) 1999 Gerald Richter (richter at embperl dot org)
# Copyright(c) 1998, 1999 Jeffrey William Baker (jeff...@kathyandjeffrey.net)
# Distribute under the Artistic License
#
@@ -114,7 +114,7 @@ Gerald Richter <richter at embperl dot o
This class was written by Jeffrey Baker (jeff...@kathyandjeffrey.net)
but it is taken wholesale from a patch that Gerald Richter
-(rich...@ecos.de) sent me against Apache::Session.
+(richter at embperl dot org) sent me against Apache::Session.
=cut
Modified: perl/embperl/trunk/Embperl/Syntax/Mail.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Syntax/Mail.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Syntax/Mail.pm (original)
+++ perl/embperl/trunk/Embperl/Syntax/Mail.pm Sat Sep 23 22:09:10 2023
@@ -134,7 +134,7 @@ Embperl::Syntax::Mail - tag library for
[$ syntax + Mail $]
- <mail:send to="rich...@ecos.de" subject="Testmail">
+ <mail:send to="richter at embperl dot org" subject="Testmail">
Hi,
this is a test for a new mail tag
it is send at [+ scalar(localtime) +]
Modified: perl/embperl/trunk/Embperl/Syntax/POD.pm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Syntax/POD.pm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Syntax/POD.pm (original)
+++ perl/embperl/trunk/Embperl/Syntax/POD.pm Sat Sep 23 22:09:10 2023
@@ -302,6 +302,14 @@ my %Escape2 = (
'cdatatype' => ntypText,
'donteat' => 1,
},
+ 'https link' => {
+ 'text' => 'https://',
+ 'nodename' => 'xlink',
+ 'nodetype' => ntypStartEndTag,
+ 'contains' =>
'/.-:~?&=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_0123456789',
+ 'cdatatype' => ntypText,
+ 'donteat' => 1,
+ },
'ftp link' => {
'text' => 'ftp://',
'nodename' => 'xlink',
Modified: perl/embperl/trunk/EmbperlD.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/EmbperlD.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/EmbperlD.pod (original)
+++ perl/embperl/trunk/EmbperlD.pod Sat Sep 23 22:09:10 2023
@@ -825,11 +825,11 @@ Dieser Hash ermöglicht es HTTP Header a
Ist ein "Location" Header angegeben, setzt I<Embperl> den Status automatisch
auf 301. Beispiel:
- [- $http_headers_out{'Location'} = "http://www.ecos.de/embperl/"; -]
+ [- $http_headers_out{'Location'} = "https://www.actevy.io/embperl/"; -]
Wird ein Array als Location angeben, gibt das zweite Element den Status Code
an:
- [- $http_headers_out{Location} = [ "http://www.ecos.de/embperl/";, 303 ]; -]
+ [- $http_headers_out{Location} = [ "https://www.actevy.io/embperl/";, 303 ];
-]
Ab 1.3.2 können alle HTTP Header (außer "Content-Type") auch
@@ -1336,46 +1336,7 @@ nutzen aufnehmen.
=head2 Kommerzieller Support
-I<ecos> bietet die Möglichkeit, Support für Embperl zu kaufen. Dies umfasst:
-
-=over 4
-
-=item * Beratung und Unterstützung Ihrer Programmierer
-
-=item * Konzeptionierung und Plannung von dynamischen Websites
-
-=item * Erstellung von teilweisen oder kompletten Webangeboten
-
-=item * Beseitigung von Fehler in Embperl (auch für mod_perl und Apache)
-
-=item * Implementierung neuer Features
-
-=back
-
-Sie erreichen uns via http://www.ecos.de oder richter at embperl dot org
-
-
-=head2 Wie kann ich die Entwicklung von Embperl unterstützen
-
-Wenn Sie I<Embperl> einsetzen und dessen weitere Entwicklung unterstützen
-möchten, gibt es zwei Möglichkeiten:
-
-=over 4
-
-=item 1
-
-Sie implementieren ihr Wunschfeature selbst und senden uns einen Patch.
-
-=item 2
-
-Sie kaufen kommerziellen Support (siehe oben). Auch wenn sie B<vielleicht>
-die selben Antworten auf ihre Fragen auf der Mailingliste bekommen würden,
-macht es Sinn Support zu kaufen. Zum einen können sie sich dann sicher sein,
-B<immer> eine Antwort auf ihre Fragen zu bekommen, zum anderen unterstützen
-sie damit die weitere Entwicklung von I<Embperl> und ermöglichen uns
-mehr Zeit und Resourcen dafür aufzubringen.
-
-=back
+Sie erreichen uns via https://www.actevy.io oder richter at embperl dot org
=head1 Links und Download
@@ -1388,7 +1349,7 @@ mod_perl FAQ http:
Embperl http://perl.apache.org/embperl/
-Embperl (deutsch) http://www.ecos.de/embperl/
+Embperl (deutsch) https://www.actevy.io/embperl/
DBIx::Recordset http://search.cpan.org/~grichter/
Modified: perl/embperl/trunk/Faq.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Faq.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Faq.pod (original)
+++ perl/embperl/trunk/Faq.pod Sat Sep 23 22:09:10 2023
@@ -813,7 +813,7 @@ handle sessions for you inside the %udat
The following way works with mod_perl and as cgi:
- [- $http_headers_out{'Location'} = "http://www.ecos.de/embperl/"; -]
+ [- $http_headers_out{'Location'} = "https://www.actevy.io/embperl/"; -]
the status of the request will automatically set to 301.
@@ -1451,11 +1451,9 @@ of file-uploads.
=head2 Where can I get more help?
-You can get free support on the mod_perl mailing list. If you need
-commercial support (with a guarantee for response time or a solution) for
-Embperl, or if you want a web site where you can run your Embperl/mod_perl
-scripts without setting up your own web server, please send email to
-i...@ecos.de.
+You can get free support on the embperl mailing list. If you need
+commercial support for Embperl, please send email to
+richter at embperl dot org.
Please also see the section L<Embperl/"Support"> in the Embperl documentation.
Modified: perl/embperl/trunk/INSTALL.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/INSTALL.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/INSTALL.pod (original)
+++ perl/embperl/trunk/INSTALL.pod Sat Sep 23 22:09:10 2023
@@ -413,6 +413,6 @@ See L<"perldoc TipsAndTricks"|"TipsAndTr
around Embperl.
or you can view it online on http://perl.apache.org/embperl/
-and http://www.ecos.de/embperl/
+and https://www.actevy.io/embperl/
Modified: perl/embperl/trunk/Intro.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Intro.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Intro.pod (original)
+++ perl/embperl/trunk/Intro.pod Sat Sep 23 22:09:10 2023
@@ -313,7 +313,7 @@ Depending on the values of $fdat{check},
$fdat{name} and $fdat{email} contains data, the document decides which
part to show.
- [- $MailTo = 'richter\@ecos.de' ;
+ [- $MailTo = 'user\@example.org' ;
@errors = () ;
if (defined($fdat{check}) || defined($fdat{send}))
Modified: perl/embperl/trunk/IntroD.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/IntroD.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/IntroD.pod (original)
+++ perl/embperl/trunk/IntroD.pod Sat Sep 23 22:09:10 2023
@@ -280,7 +280,7 @@ C<$fdat{email}> Daten enthalten, entsche
Ausführung kommt.
- [- $MailTo = 'richter\@ecos.de' ;
+ [- $MailTo = 'user\@example.org' ;
@errors = () ;
if (defined($fdat{check}) || defined($fdat{send}))
Modified: perl/embperl/trunk/IntroEmbperl2.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/IntroEmbperl2.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/IntroEmbperl2.pod (original)
+++ perl/embperl/trunk/IntroEmbperl2.pod Sat Sep 23 22:09:10 2023
@@ -708,10 +708,10 @@ http://perl.apache.org/embperl
or
-http://www.ecos.de/embperl
+https://www.actevy.io/embperl
=head1 Authors
-Gerald Richter (richter at ecos dot de)
-Axel Beckert (abe at ecos dot de)
+G. Richter (richter at embperl dot org)
+Axel Beckert
Modified: perl/embperl/trunk/IntroEmbperlForm.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/IntroEmbperlForm.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/IntroEmbperlForm.pod (original)
+++ perl/embperl/trunk/IntroEmbperlForm.pod Sat Sep 23 22:09:10 2023
@@ -18,7 +18,7 @@ Also Embperl::Form is designed to be use
it can be used outside of Embperl as well.
-B<NOTE: This is a preliminary document, please go to
http://www.ecos.de/embperl
+B<NOTE: This is a preliminary document, please go to
https://www.actevy.io/embperl
and watch out for an updated version.>
=head1 Embperl::Form objects
@@ -153,7 +153,7 @@ fields which provides the list of contro
=head1 See also
-This is a preliminary document, please go to http://www.ecos.de/embperl
+This is a preliminary document, please go to https://www.actevy.io/embperl
and watch out for an updated version.
=head1 Author
Modified: perl/embperl/trunk/Makefile.PL
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/Makefile.PL?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/Makefile.PL (original)
+++ perl/embperl/trunk/Makefile.PL Sat Sep 23 22:09:10 2023
@@ -1,7 +1,8 @@
#
# Building Makefile for Embperl
#
-# (C) 1997-2005 G.Richter (richter at embperl dot org) / ECOS
+# Embperl - Copyright (c) 1997-2008 Gerald Richter / ecos gmbh www.ecos.de
+# Embperl - Copyright (c) 2008-2014 Gerald Richter
#
Modified: perl/embperl/trunk/NEWS.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/NEWS.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/NEWS.pod (original)
+++ perl/embperl/trunk/NEWS.pod Sat Sep 23 22:09:10 2023
@@ -13,7 +13,7 @@ ftp://ftp.dev.ecos.de/pub/perl/embperl/H
=item * 25. Mar 2001
My talk from the 3. German Perl-Workshop (http://www.perlworkshop.de)
-is available at http://www.ecos.de/ep/pod/conf/ApCon2001.Embperl.zip .
+is available at https://www.actevy.io/ep/pod/conf/ApCon2001.Embperl.zip .
It also contains a good introduction to the new features in Embperl 2.0 .
=item * 1. Mar 2001
@@ -62,7 +62,7 @@ in a OO-style, is the main improvement s
=item * 1. Dec 2000
The slides from my talk on the O'Reilly Open Source Software Convention are
now available
-at http://www.ecos.de/embperl/index.htm/ep/pod/oscon2000/index.html .
+at https://www.actevy.io/embperl/index.htm/ep/pod/oscon2000/index.html .
=item * 15. Nov 2000
@@ -89,7 +89,7 @@ http://www.oreillynet.com/pub/e_sess/863
Slides are available at
-http://www.ecos.de/embperl/index.htm/ep/pod/oscon2000/index.html
+https://www.actevy.io/embperl/index.htm/ep/pod/oscon2000/index.html
=item * 26. May 2000
Modified: perl/embperl/trunk/README
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/README?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/README (original)
+++ perl/embperl/trunk/README Sat Sep 23 22:09:10 2023
@@ -67,10 +67,7 @@ All the above and further information ca
All the above and further information can be found at the german Embperl
website
- http://www.ecos.de/embperl/
-
-
----> See README.v2 if you upgrade from 1.x <---
+ https://www.actevy.io/embperl/
FEATURES
@@ -137,111 +134,243 @@ Can also run as a free standing CGI-scri
COMPATIBILITY
=============
-I have tested Embperl successfully
+I have tested Embperl successfully on different linux distributions.
+Embperl does work on Windows, but is not fully tested there.
-on Linux 2.x with
+See perldoc INSTALL.pod for installation instructions.
-perl5.005_01/02/03
-perl5.6.1
-perl5.8.x
-perl5.10.x
-perl5.12.x
-perl5.14.x
-perl5.16.x
-perl5.18.x
-apache_1.3.x, apache 2.0.x, apache 2.2.x, apache 2.4.x
-apache + mod_ssl
-apache_ssl (Ben SSL)
-Stronghold 2.2
-Stronghold 2.4.1
-
-on Windows NT 4.0 with
-
-perl5.004_04
-perl5.005_xx
-perl5.6.1
-perl5.8.x
-apache_1.3.0 - apache_1.3.31
-
-Apache 2 is currently not supported on Windows.
-This is planned for Embperl 3
-
-on Windows 95/98 with
-
-perl5.004_02 (binary distribution)
-Offline mode
-perl5.005_03 + apache_1.3.6
+Hints for using Embperl 2.x and higher
+--------------------------------------
-I know from other people that it works on many other UNIX systems
+Embperl 2 is totaly rewritten. Most of the Perl code is moved
+into C to speed up processing. The core is totaly redesigned to
+give a lot of new possibilities.
-FEEDBACK and BUG REPORTS
-========================
+The Embperl core now works in a totaly different way. The processing
+of the source towards the output is done by providers. Every provider
+takes a small step. Which providers are used is defined by a recipe.
+The standard Embperl recipe contains the following providers:
-Please let me know if you use or test this module. Bugs, questions,
-suggestions for things you would find useful, etc., are discussed on
-the Embperl mailing list. If you have a site that is using Embperl,
-I would love to mention it in the list of sites using Embperl
-(http://perl.apache.org/embperl/db/sites/sites.htm). Please go
-to the Embperl website and add your site.
+ 1 reading the source
+ 2 parsing
+ 3 compiling
+ 4 executing
+ 5 outputing
+The providers work in a similar way as Unix shell programs which are
+processing a single source in a pipeline towards the output. In
+Embperl is is not only a smimple pipeline, but a tree structure,
+so multiple sources can be incorpoarted in one result.
+Recipes descripes how providers are executed.
+Rearrangeing the provideres or writing and useing new ones gives
+flexibility and power. Addtional to the standard Embperl providers
+Embperl ships with XML parser and XSLT processor providers.
-The Embperl mailing list (embp...@perl.apache.org) is available for Embperl
users
-and developers to share ideas, solve problems and discuss things related to
Embperl
-To subscribe to this list, send mail to embperl-subscr...@perl.apache.org.
-To unsubscribe send email to embperl-unsubscr...@perl.apache.org .
+The new execution scheme is also faster, because html tags and metacommands
+are parsed only once (Perl code was also (and is still) cached in 1.x)
+My first benchmarks show 50%-100% faster execution under mod_perl
+compared to Embperl 1.x.
-There is an archive for the Embperl mailing list at
-http://mail-archives.apache.org/mod_mbox/perl-embperl
+Another new feature is that the syntax of the Embperl parser is defined
+within the module Embperl::Syntax and can be modified as nessecary.
+Embperl comes with a set of syntax definitons which can be modified by
+the user. So far there are syntax definitions for SSI, Text only, Perl only,
+ASP, POD, RTF and a Mail taglib. You can tell Embperl which syntax to use
either in
+the configuration via EMBPERL_SYNTAX, or with the syntax parameter of
+Execute, or you can change the syntax dynamically inside the page via the
+[$syntax $] command. You also could specify more then one syntax at the same
+time, e.g. [$syntax Embperl SSI $] to mix Embperl tags and SSI tags in the same
+page.
+
+If you'd like to create your own syntax read:
+
+ perldoc Embperl::Syntax
+
+and look at the files under Embperl/Syntax/ for examples on how to do it.
+
+Also new is the ability to cache (parts of) the output. See
+the new configuration directives below.
+
+Starting with 2.0b6 Embperl provides a set of new object, which allows
+to access Embperl internals and manipulate the processing. Basicly there
+are three major objects:
+
+ - Application
+ - Request
+ - Component
+
+The application object is responsible for a set of pages that forms an
+application. It is used to configure things like session handling and
+logging which should be unique across these pages. More important
+it can be overriden and the overriden object can contain the application
+logic, to create a proper separation of logic and presentation.
+
+The request object holds everything which spans a whole (HTTP-)request.
+
+The component object is responsible for a single component, inside the
+desired output. It holds things like sourcefile etc.
+
+All three objects have a subobject which holds the configuration and a
+subobject for it's current parameters.
+
+
+Debugging
+---------
+
+Starting with 2.0b2 Embperl files can debugged via the interactive debugger.
+The debugger shows the Embperl page source along with the correct linenumbers.
+You can do anything you can do inside a normal Perl program via the debugger,
+e.g. show variables, modify variables, single step, set breakpoints etc.
+
+You can use the Perl interacive command line debugger via
+
+ perl -d embpexec.pl file.epl
+
+or if you prefer a graphical debugger, try ddd
(http://www.gnu.org/software/ddd/)
+it's a great tool, also for debugging any other perl script:
+
+ ddd --debugger 'perl -d embpexec.pl file.epl'
+
+
+NOTE: embpexec.pl could be found in the Embperl source directory
+
+If you want to debug your pages, while running under mod_perl, Apache::DB is
the
+right thing. Apache::DB is available from CPAN.
-For mod_perl related questions you may search the mod_perl mailing list
-archive at http://mail-archives.apache.org/mod_mbox/perl-modperl
+The following differences to Embperl 1.x apply:
+------------------------------------------------------
+- When running under mod_perl you _must_ load Embperl
+ at server startup time. Either with a
+ PerlModule Embperl
-COMMERICAL SUPPORT
-==================
+ in your httpd.conf or a
-You can get free support on the Embperl mailing list (see above). If
-you need commercial support, ecos can provide it for you. We offer:
+ use Embperl ;
-* Consulting, assitance and training for you and your programmers
+ inside of a startup script.
+ You can use the Embperl configuration directives now
+ directly, (without PerlSetEnv/SetEnv). If you still
+ want to use environment varibales to configure Embperl, write
-* Planning of your dynamic website
+ Embperl_UseEnv on
-* Creating of parts or a whole website
+- Embperl now supports Apache 2 / mod_perl 2, but you need a additional
+ configuration line in your httpd.conf:
-* Fixing bugs in Embperl (also available for mod_perl)
+ LoadModule embperl_module /path/to/perl/site/lib/Embperl/Embperl.so
-* Adding new features
-You can reach us via http://www.ecos.de or richter at embperl dot org
+- For every container in your httpd.conf (e.g. VirtualHost,Directory,Location)
+ where you want to define any application level configuration directives
+ (see below under tAppConfig for a list), you need to set a unique
+ value for EMBPERL_APPNAME. This is for example necessary for all
+ Embperl::Object parameters. Example:
+ <Location /eo>
+ EMBPERL_APPNAME my_embperl_app
+ EMBPERL_OBJECT_BASE base.epl
+ </Location>
+
+- The following options can currently only be set from httpd.conf:
+ optKeepSpaces
+- The option optRawInput is replaced by EMBPERL_INPUT_ESCMODE,
+ which is off by default (same as when optRawInput was set
+ in 1.x)
-HOW TO SUPPORT THE DEVELOPMENT OF EMBPERL
-=========================================
+- The following options are currently not supported:
+ optRedirectStdout
+ optDisableHtmlScan, optDisableTableScan,
+ optDisableInputScan, optDisableMetaScan
-If you use and like Embperl and want to support it's ongoing development
-you have two possibilities:
+ optDisableHtmlScan can be replaced by switching the syntax, e.g.
-1. Send me patches for things you like to see in Embperl
+ [$syntax EmbperlBlocks $] # same as [- $optDisableHtmlScan = 1 -]
-2. Donate money to Embperl. See http://perl.apache.org/donate.htm
+ (here goes your code - Embperl will not interpret any html tags here)
-3. Buy commercial support (see above). Also you _may_ get the same answers
- to your questions on the mailing list, by buying the commercial support
- you not only buy support for yourself and can be sure you get an answer,
- you also give us the possibility to put more power in the further
- development of Embperl.
+ [$syntax Embperl $] # same as [- $optDisableHtmlScan = 0 -]
-LOGO
-====
+- Nesting must be done properly. I.e. you cannot put a <table> tag (for a
+ dynamic table) inside an 'if' and the </table> inside another 'if'.
+ (That still works for static tables)
-The Embperl distribution contains a "Powered by Embperl" Logo
-(EmbperlLogo.gif) which you may place at your Web-site if you like.
+- optUndefToEmptyValue is always set and cannot be disabled.
+
+- [$ foreach $x (@x) $] now requires the brackets around the
+ array (like Perl)
+
+- [+ +] blocks must now contain a valid Perl expression. Embperl 1.x
+ allows you to put multiple statements into such a block. For performance
+ reasons this is not possible anymore. Also the expression must _not_ be
+ terminated with a semicolon. To let old code work, just wrap it into a 'do'
+ e.g. [+ do { my $a = $b + 5 ; $a } +]
+
+- EMBPERL_INPUT_FUNC and EMBPERL_OUTPUT_FUNC are not supported anymore
+ You can the same result and much more by writing custom provider.
+
+- Embperl doesn't change the current working directory anymore to the
+ directory of the source file. This is done for performance reasons
+ and because it won't reliable work with threads under mod_perl 2.0.
+ You can use $req -> component -> cwd to get the directory of the
+ sourcefile (where $req is Embperl request object, which is the first
+ parameter passed to the page i.e. $_[0])
+
+- safe namespaces are not supported anymore, since are are not really
+ safe anyway
+
+- errors can be mailed to an administrator
+
+- Parameters of SetupSession, CleanupSession and SetSessionCookie have changed.
+
+
+Embperl 1.x compatibility flag
+------------------------------
+
+The compatibility flag isn't available anymore in 2.0b6. Since now
+Embperl 2.0 lives in his own namespace, you can install Embperl 1.x and
+2.x on the same machine without conflicts.
+
+
+
+exit
+----
+
+B<exit> will override the normal Perl exit in every Embperl document. Calling
+exit will immediately stop any further processing of that file and send the
+already-done work to the output/browser.
+
+B<NOTE 1:> If you are inside of an Execute, Embperl will only exit this
Execute, but
+the file which called the file containing the exit with Execute will continue.
If
+you want to exit the whole request, call exit with an argument e.g. exit (200)
+
+B<NOTE 2:> If you write a module which should work with Embperl under
mod_perl,
+you must use Embperl::exit instead of the normal Perl exit. (In 1.3.x it was
+Apache::Exit)
+
+
+FEEDBACK and BUG REPORTS
+========================
+
+Please let me know if you use or test this module. Bugs, questions,
+suggestions for things you would find useful, etc., are discussed on
+the Embperl mailing list.
+
+The Embperl mailing list (embp...@perl.apache.org) is available for Embperl
users
+and developers to share ideas, solve problems and discuss things related to
Embperl
+To subscribe to this list, send mail to embperl-subscr...@perl.apache.org.
+To unsubscribe send email to embperl-unsubscr...@perl.apache.org .
+
+There is an archive for the Embperl mailing list at
+http://mail-archives.apache.org/mod_mbox/perl-embperl
+
+For mod_perl related questions you may search the mod_perl mailing list
+archive at http://mail-archives.apache.org/mod_mbox/perl-modperl
AUTHOR
@@ -250,3 +379,4 @@ AUTHOR
G. Richter (richter at embperl dot org)
+
Modified: perl/embperl/trunk/SVN.pod
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/SVN.pod?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/SVN.pod (original)
+++ perl/embperl/trunk/SVN.pod Sat Sep 23 22:09:10 2023
@@ -52,13 +52,6 @@ http://svn.apache.org/repos/asf/perl/emb
A more confortable way is to use
http://svn.apache.org/viewcvs.cgi/perl/embperl/
-=head2 Snapshot
-
-A snapshot is rolled off the Embperl tree every 6 hours and placed
-here:
-
-http://svn.apache.org/snapshots/embperl/
-
=head2 Embperl 1.x
Modified: perl/embperl/trunk/eg/web/config.pl
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/config.pl?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/config.pl (original)
+++ perl/embperl/trunk/eg/web/config.pl Sat Sep 23 22:09:10 2023
@@ -11,8 +11,8 @@ sub new
$self -> {dbdsn} = $^O eq
'MSWin32'?'dbi:ODBC:embperl':'dbi:mysql:embperl' ;
$self -> {dbuser} = 'www' ;
$self -> {dbpassword} = undef ;
- $self -> {adminemail} = 'rich...@ecos.de';
- $self -> {emailfrom} = 'embp...@ecos.de';
+ $self -> {adminemail} = 'richter at embperl dot org';
+ $self -> {emailfrom} = 'richter at embperl dot org';
# There is normally no need to change anything below this line
@@ -28,21 +28,21 @@ sub new
# check if Embperl 1.3 is installed
if ($INC{'Apache2/RequestRec.pm'})
- {
+ {
my $lib_1_3 = dirname ($INC{'Apache2/RequestRec.pm'}) ;
if (-e ($lib_1_3 . '/../HTML/Embperl.pod'))
{
$self -> {lib_1_3} = dirname($lib_1_3) ;
}
- }
+ }
elsif ($INC{'Apache.pm'})
- {
+ {
my $lib_1_3 = dirname ($INC{'Apache.pm'}) ;
if (-e ($lib_1_3 . '/HTML/Embperl.pod'))
{
$self -> {lib_1_3} = $lib_1_3 ;
}
- }
+ }
$self -> {lib_1_3} ||= '' ;
# check if DBIx::Recordset is installed
@@ -93,10 +93,10 @@ BEGIN
@menu = (
{ menu => 'Home', uri => '',
file => { en => 'eg/web/index.htm', de => 'eg/web/indexD.htm'} },
- { menu => 'Features', uri => 'pod/list/Features.htm',
file => { en => 'Features.pod', de => 'FeaturesD.pod' }, sub =>
- [
- { menu => 'Features 1.3', uri => 'Features13.htm',
path => { en => '%lib_1_3%/HTML/Embperl/Features.pod', de =>
'%lib_1_3%/HTML/Embperl/FeaturesD.pod' } }
- ]
+ { menu => 'Features', uri => 'pod/list/Features.htm',
file => { en => 'Features.pod', de => 'FeaturesD.pod' }, #sub =>
+ # [
+ # { menu => 'Features 1.3', uri => 'Features13.htm',
path => { en => '%lib_1_3%/HTML/Embperl/Features.pod', de =>
'%lib_1_3%/HTML/Embperl/FeaturesD.pod' } }
+ # ]
},
{ menu => 'Introduction', uri => 'pod/intro/', sub =>
@@ -170,34 +170,34 @@ BEGIN
desc => { en => 'Documentation on how to use Embperl for
generating and sending mail',
de => 'Dokumentation wie man Embperl benutzt um
Mail zu erstellen und zu senden' }},
# { menu => 'Embperl::Util', uri => 'EmbperlUtil.htm',
file => 'Embperl/Util.pm'},
- { menu => '1.3.6 documentation', uri => 'doc13.htm',
- desc => { en => 'Old documentation from Embperl 1.3.6',
- de => 'Alte Dokumentation von Embperl 1.3.6' },
- sub => ,
- [
- { menu => 'HTML::Embperl', uri => 'HTML/Embperl.htm',
path => { en => '%lib_1_3%/HTML/Embperl.pod', de =>
'%lib_1_3%/HTML/EmbperlD.pod'},
- desc => { en => 'Main Embperl documentation: Configuration,
Syntax, Usage etc.',
- de => 'Hauptdokumentation: Konfiguration, Syntax,
Benutzung, etc.' },
- },
- { menu => 'HTML::EmbperlObject', uri =>
'HTML/EmbperlObject.htm', path => '%lib_1_3%/HTML/EmbperlObject.pm',
- desc => { en => 'Documentation for creating object-oriented
websites',
- de => 'Dokumentation zur Erstellung von
Objekt-Orientierten Websites' }},
- { menu => 'HTML::Embperl::Mail', uri =>
'HTML/Embperl/Mail.htm', path => '%lib_1_3%/HTML/Embperl/Mail.pm' ,
- desc => { en => 'Documentation on how to use Embperl for
generating and sending mail',
- de => 'Dokumentation wie man Embperl benutzt um
Mail zu erstellen und zu senden' }},
- { menu => 'HTML::Embperl::Session',uri =>
'HTML/Embperl/Session.htm', path => '%lib_1_3%/HTML/Embperl/Session.pm' ,
- desc => { en => 'Documentation for Embperls session handling
object',
- de => 'Dokumentation über Embperls Session Objekt'
}},
- { menu => 'Tips & Tricks', uri =>
'HTML/Embperl/TipsAndTricks.htm', path =>
'%lib_1_3%/HTML/Embperl/TipsAndTricks.pod' ,
- desc => { en => 'Tips & Tricks for Embperl 1.3.6',
- de => 'Tips & Tricks für Embperl 1.3.6' }},
-
- { menu => 'FAQ', uri => 'pod/Faq.htm',
path => '%lib_1_3%/HTML/Embperl/Faq.pod',
- desc => { en => 'FAQ for Embperl 1.3.6',
- de => 'FAQ für Embperl 1.3.6' }},
+ # { menu => '1.3.6 documentation', uri =>
'doc13.htm',
+ # desc => { en => 'Old documentation from Embperl 1.3.6',
+ # de => 'Alte Dokumentation von Embperl 1.3.6' },
+ # sub => ,
+ # [
+ # { menu => 'HTML::Embperl', uri =>
'HTML/Embperl.htm', path => { en => '%lib_1_3%/HTML/Embperl.pod',
de => '%lib_1_3%/HTML/EmbperlD.pod'},
+ # desc => { en => 'Main Embperl documentation:
Configuration, Syntax, Usage etc.',
+ # de => 'Hauptdokumentation: Konfiguration,
Syntax, Benutzung, etc.' },
+ # },
+ # { menu => 'HTML::EmbperlObject', uri =>
'HTML/EmbperlObject.htm', path => '%lib_1_3%/HTML/EmbperlObject.pm',
+ # desc => { en => 'Documentation for creating
object-oriented websites',
+ # de => 'Dokumentation zur Erstellung von
Objekt-Orientierten Websites' }},
+ # { menu => 'HTML::Embperl::Mail', uri =>
'HTML/Embperl/Mail.htm', path => '%lib_1_3%/HTML/Embperl/Mail.pm' ,
+ # desc => { en => 'Documentation on how to use Embperl for
generating and sending mail',
+ # de => 'Dokumentation wie man Embperl benutzt um
Mail zu erstellen und zu senden' }},
+ # { menu => 'HTML::Embperl::Session',uri =>
'HTML/Embperl/Session.htm', path => '%lib_1_3%/HTML/Embperl/Session.pm' ,
+ # desc => { en => 'Documentation for Embperls session
handling object',
+ # de => 'Dokumentation über Embperls Session
Objekt' }},
+ # { menu => 'Tips & Tricks', uri =>
'HTML/Embperl/TipsAndTricks.htm', path =>
'%lib_1_3%/HTML/Embperl/TipsAndTricks.pod' ,
+ # desc => { en => 'Tips & Tricks for Embperl 1.3.6',
+ # de => 'Tips & Tricks für Embperl 1.3.6' }},
+
+ # { menu => 'FAQ', uri => 'pod/Faq.htm',
path => '%lib_1_3%/HTML/Embperl/Faq.pod',
+ # desc => { en => 'FAQ for Embperl 1.3.6',
+ # de => 'FAQ für Embperl 1.3.6' }},
- ],
- },
+ # ],
+ # },
{ menu => 'DBIx::Recordset', uri => 'Recordset.htm', path =>
'%lib_dbix%/DBIx/Recordset.pm',
desc => { en => 'Documentation of DBIx::Recordset',
de => 'Dokumentation von DBIx::Recordset' }},
@@ -210,53 +210,54 @@ BEGIN
}, #{ menu => 'FAQ', uri => 'pod/Faq.htm',
file => 'Faq.pod' },
#{ menu => 'Examples', uri => 'examples/' },
- { menu => 'Download', uri =>
'pod/doc/Embperl.-page-19-.htm'}, #sect_44' },
- { menu => 'Support', uri =>
'pod/doc/Embperl.-page-18-.htm', sub =>
- [
- { menu => 'Donate', relurl => 'donate.htm',
file => { en => 'eg/web/donate.htm', de => 'eg/web/donateD.htm'} }
- ]
+ #{ menu => 'Download', uri =>
'pod/doc/Embperl.-page-19-.htm'}, #sect_44' },
+ { menu => 'Support', uri =>
'pod/doc/Embperl.-page-18-.htm',
+ # sub =>
+ # [
+ # { menu => 'Donate', relurl => 'donate.htm',
file => { en => 'eg/web/donate.htm', de => 'eg/web/donateD.htm'} }
+ # ]
- },
+ },
{ menu => 'Changes', uri => 'pod/Changes.htm',
file => 'Changes.pod' },
#{ menu => 'Sites using Embperl', uri => 'pod/Sites.htm',
file => 'Sites.pod' },
- { menu => 'Wiki', uri => 'db/wiki/index.htm', file =>
'/eg/web/db/wiki.epl', same =>
- [
- { menu => 'Wiki', uri => 'db/wiki/index.cgi', file =>
'/eg/web/db/wiki.epl' },
- ] },
- { menu => 'More infos', uri => 'db/', sub =>
- [
- { menu => 'News', uri => 'news/news.htm',
file => 'eg/web/db/news/data.epd', fdat => { 'category_id' => 1 },
- desc => { en => 'Full list of all news.',
- de => 'Vollständige Liste aller Neuigkeiten.' }},
- { menu => 'Sites using Embperl', uri => 'sites/sites.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 2 },
- desc => { en => 'Description of Websites that use Embperl.',
- de => 'Beschreibung von Websites die Embperl
einsetzen.' }},
- { menu => 'Books', uri => 'sites/books.htm', file =>
'eg/web/db/data.epd', fdat => { 'category_id' => 3 },
- desc => { en => 'Books that contain information about
Embperl.',
- de => 'Bücher die Embperl behandeln.' }},
- { menu => 'Articles', uri => 'sites/articles.htm', file
=> 'eg/web/db/data.epd', fdat => { 'category_id' => 4 },
- desc => { en => 'Articles that cover Embperl.',
- de => 'Artikel die Embperl behandeln.' }},
- { menu => 'Modules & Examples', uri => 'sites/examples.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 6 },
- desc => { en => 'Modules and Examples with source code for
use/that uses Embperl.',
- de => 'Modules und Beispiele incl. Quelltext
zur/unter Benutzung von Embperl.' }},
- { menu => 'Editorsupport', uri => 'sites/editors.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 5 },
- desc => { en => 'Syntax highlighting and other support for
editors.',
- de => 'Syntaxhervorhebungen unter Unterstützung
für Editoren.' }},
- { menu => 'Conferences', uri => 'sites/conferences.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 7 },
- desc => { en => 'Talks about Embperl.',
- de => 'Vorträge über Embperl.' }},
- ],
- },
- { menu => 'Add info about Embperl', uri => 'db/addsel.epl', same =>
- [
- { menu => 'Enter info to add about Embperl', uri =>
'db/add.epl' },
- { menu => 'Show info added about Embperl', uri =>
'db/show.epl'},
- { menu => 'Infos about Embperl', uri =>
'db/data.epd' },
- { menu => 'Infos about Embperl', uri =>
'db/list.epl' },
- ],
- },
- { menu => 'Login', uri => 'db/login.epl'},
+ # { menu => 'Wiki', uri => 'db/wiki/index.htm', file =>
'/eg/web/db/wiki.epl', same =>
+ # [
+ # { menu => 'Wiki', uri => 'db/wiki/index.cgi', file
=> '/eg/web/db/wiki.epl' },
+ # ] },
+ # { menu => 'More infos', uri => 'db/', sub =>
+ # [
+ # { menu => 'News', uri => 'news/news.htm',
file => 'eg/web/db/news/data.epd', fdat => { 'category_id' => 1 },
+ # desc => { en => 'Full list of all news.',
+ # de => 'Vollständige Liste aller Neuigkeiten.' }},
+ # { menu => 'Sites using Embperl', uri => 'sites/sites.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 2 },
+ # desc => { en => 'Description of Websites that use
Embperl.',
+ # de => 'Beschreibung von Websites die Embperl
einsetzen.' }},
+ # { menu => 'Books', uri => 'sites/books.htm', file =>
'eg/web/db/data.epd', fdat => { 'category_id' => 3 },
+ # desc => { en => 'Books that contain information about
Embperl.',
+ # de => 'Bücher die Embperl behandeln.' }},
+ # { menu => 'Articles', uri => 'sites/articles.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 4 },
+ # desc => { en => 'Articles that cover Embperl.',
+ # de => 'Artikel die Embperl behandeln.' }},
+ # { menu => 'Modules & Examples', uri => 'sites/examples.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 6 },
+ # desc => { en => 'Modules and Examples with source code for
use/that uses Embperl.',
+ # de => 'Modules und Beispiele incl. Quelltext
zur/unter Benutzung von Embperl.' }},
+ # { menu => 'Editorsupport', uri => 'sites/editors.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 5 },
+ # desc => { en => 'Syntax highlighting and other support for
editors.',
+ # de => 'Syntaxhervorhebungen unter Unterstützung
für Editoren.' }},
+ # { menu => 'Conferences', uri => 'sites/conferences.htm',
file => 'eg/web/db/data.epd', fdat => { 'category_id' => 7 },
+ # desc => { en => 'Talks about Embperl.',
+ # de => 'Vorträge über Embperl.' }},
+ # ],
+ # },
+ # { menu => 'Add info about Embperl', uri => 'db/addsel.epl', same =>
+ # [
+ # { menu => 'Enter info to add about Embperl', uri =>
'db/add.epl' },
+ # { menu => 'Show info added about Embperl', uri =>
'db/show.epl'},
+ # { menu => 'Infos about Embperl', uri =>
'db/data.epd' },
+ # { menu => 'Infos about Embperl', uri =>
'db/list.epl' },
+ # ],
+ # },
+ # { menu => 'Login', uri => 'db/login.epl'},
) ;
Modified: perl/embperl/trunk/eg/web/content.epl
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/content.epl?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/content.epl (original)
+++ perl/embperl/trunk/eg/web/content.epl Sat Sep 23 22:09:10 2023
@@ -7,7 +7,7 @@
<br>
#]
<br>
- [- Execute ({inputfile => '*', syntax => 'Text'}) -]</td>
+ [- Execute ({inputfile => '*', syntax => 'Text'}) -]</td>
<td valign="top" align="left" width="152" class="cContentNews">
[- Execute ('news.epl') -]
</td>
Modified: perl/embperl/trunk/eg/web/donate.htm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/donate.htm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/donate.htm (original)
+++ perl/embperl/trunk/eg/web/donate.htm Sat Sep 23 22:09:10 2023
@@ -41,6 +41,6 @@ ecos can provide it for you. We offer:
<li>Adding new features</li>
</ul>
-You can reach us via <a href="http://www.ecos.de";>http://www.ecos.de</a> or
+You can reach us via <a href="https://www.actevy.io";>https://www.actevy.io</a>
or
<a href="mailto:i...@ecos.de";>i...@ecos.de</a>.
Modified: perl/embperl/trunk/eg/web/donateD.htm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/donateD.htm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/donateD.htm (original)
+++ perl/embperl/trunk/eg/web/donateD.htm Sat Sep 23 22:09:10 2023
@@ -44,7 +44,7 @@ Dies umfasst:
<li>Implementierung neuer Features</li>
</ul>
-<p>Sie erreichen uns via <a href="http://www.ecos.de";>http://www.ecos.de</a>
+<p>Sie erreichen uns via <a
href="https://www.actevy.io";>https://www.actevy.io</a>
oder
<a href="mailto:i...@ecos.de";>i...@ecos.de</a>.
Modified: perl/embperl/trunk/eg/web/epwebapp.pl
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/epwebapp.pl?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/epwebapp.pl (original)
+++ perl/embperl/trunk/eg/web/epwebapp.pl Sat Sep 23 22:09:10 2023
@@ -114,6 +114,7 @@ sub map_file
# check if we have anything under this uri in our configuration
# if it's a directory, try to append index.*
my $m ;
+ $uri = '' if ($uri eq 'index.htm') ;
$uri =~ /^(.*)\./ ;
if (!($m = $config -> {map1}{$uri} || $config -> {map2}{$1}))
{
@@ -205,10 +206,10 @@ sub init
$lang_ok = 1 ;
last ;
}
- elsif ($accept_lang && $_ eq $accept_lang)
- {
- $lang_ok = 1 ;
- }
+ elsif ($accept_lang && $_ eq $accept_lang)
+ {
+ $lang_ok = 1 ;
+ }
}
$r -> param -> uri ($uri) ;
Modified: perl/embperl/trunk/eg/web/footer.htm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/footer.htm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/footer.htm (original)
+++ perl/embperl/trunk/eg/web/footer.htm Sat Sep 23 22:09:10 2023
@@ -1,6 +1,6 @@
<hr>
<table width="100%" border=0 cellspacing=0 cellpadding=0><tr>
-<td align=left class="cFoot">© 1997-2012 Gerald Richter / <a
href="http://www.ecos.de/";>ecos gmbh</a></td>
+<td align=left class="cFoot">© 1997-2023 Gerald Richter / <a
href="https://www.actevy.io/";>actevy</a></td>
[$if $udat{user_id} $]
<td align=right class="cFoot">
[= logged_in_as =] [+ $udat{user_email} +]
Modified: perl/embperl/trunk/eg/web/header.epl
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/header.epl?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/header.epl (original)
+++ perl/embperl/trunk/eg/web/header.epl Sat Sep 23 22:09:10 2023
@@ -53,7 +53,7 @@ $site = $1 if ($ENV{HTTP_USER_AGENT} =~
<input type="hidden" name="forid" value="1"></input>
<input type="hidden" name="ie" value="ISO-8859-1"></input>
<input type="hidden" name="oe" value="ISO-8859-1"></input>
-<input type="hidden" name="cof"
value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:336699;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;LH:74;LW:74;L:http://www.ecos.de/embperl/images/EmbperlLogo.gif;S:http://www.ecos.de/embperl;LP:1;FORID:1;";></input>
+<input type="hidden" name="cof"
value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:336699;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;LH:74;LW:74;L:https://www.actevy.io/embperl/images/EmbperlLogo.gif;S:https://www.actevy.io/embperl;LP:1;FORID:1;";></input>
<input type="hidden" name="hl" value="[+ $r -> param -> language +]"></input>
<input type="submit" name="sa" value="[+ $r -> param -> language eq
'de'?'Suchen':'Search' +]"></input>
</td></tr></table>
Modified: perl/embperl/trunk/eg/web/indexD.htm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/indexD.htm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/indexD.htm (original)
+++ perl/embperl/trunk/eg/web/indexD.htm Sat Sep 23 22:09:10 2023
@@ -31,17 +31,16 @@ Schreiben von benutzerspezifischen Provi
Es kann dabei unter <a href="http://perl.apache.org/";
target="_blank">mod_perl</a>,
als CGI Skript oder Offline ausgeführt werden.</p>
-<p>Die <a href="http://www.ecos.de/embperl/pod/list/Features.htm";>Liste der
Features</a>
-und die <a href="http://www.ecos.de/embperl/pod/intro/";>Einführungsartikel</a>
zur verschiedenen Aspekten
+<p>Die <a href="https://www.actevy.io/embperl/pod/list/Features.htm";>Liste der
Features</a>
+und die <a
href="https://www.actevy.io/embperl/pod/intro/";>Einführungsartikel</a> zur
verschiedenen Aspekten
und Bereichen
von Embperl geben einen weiteren Überblick über die Fülle an
Möglichkeiten.</p>
-<p><b>Embperl</b> wird durch die <a href="http://www.ecos.de/";
target="_blank">ecos
- gmbh</a> (www.ecos.de) entwickelt, gepflegt und
-<a
href="http://www.ecos.de/embperl/pod/doc/doc13/HTML/Embperl.-page-16-.htm#sect_80";>supported</a>.
+<p><b>Embperl</b> wird durch die <a href="https://www.actevy.io/";
target="_blank">www.acteviy.io</a> entwickelt, gepflegt und
+<a
href="https://www.actevy.io/embperl/pod/doc/doc13/HTML/Embperl.-page-16-.htm#sect_80";>supported</a>.
Ideen, Anregungen, weiteres Feedback und Patches sind jederzeit willkommen und
-sollten an die <a
href="http://www.ecos.de/embperl/pod/doc/doc13/HTML/Embperl.-page-16-.htm";>Embperl-Mailingliste</a>
+sollten an die <a
href="https://www.actevy.io/embperl/pod/doc/doc13/HTML/Embperl.-page-16-.htm";>Embperl-Mailingliste</a>
gesendet werden.</p>
<p><b>Embperl</b> darf sowohl unter <b>GPL</b>, wie auch unter der <b>Artistic
Modified: perl/embperl/trunk/eg/web/paypal.epl
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/web/paypal.epl?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/paypal.epl (original)
+++ perl/embperl/trunk/eg/web/paypal.epl Sat Sep 23 22:09:10 2023
@@ -7,8 +7,8 @@
<input type="hidden" name="no_shipping" value="1">
<input type="hidden" name="tax" value="0">
<input type="hidden" name="bn" value="PP-DonationsBF">
-<input type="hidden" name="cancel_return" value="http://www.ecos.de/embperl";>
-<input type="hidden" name="return" value="http://www.ecos.de/embperl";>
+<input type="hidden" name="cancel_return"
value="https://www.actevy.io/embperl";>
+<input type="hidden" name="return" value="https://www.actevy.io/embperl";>
[$ if $epreq -> param -> language eq 'de' $]
<input type="hidden" name="item_name" value="Spenden für Embperl Entwicklung">
<input type="hidden" name="cn" value="Nachricht">
Modified: perl/embperl/trunk/eg/webutil/db.schema
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/webutil/db.schema?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/webutil/db.schema (original)
+++ perl/embperl/trunk/eg/webutil/db.schema Sat Sep 23 22:09:10 2023
@@ -101,8 +101,8 @@
{ id =>15, item_id => 8, heading => '6/25/2002', language_id => 'en',
description => 'Embperl 2.0b8 released. Contains many bugfixes, runs with
mod_perl 2.' },
{ id =>16, item_id => 8, heading => '25.6.2002', language_id => 'de',
description => 'Embperl 2.0b8 freigegeben. Enthält viel Fehlerkorrekturen und
läuft mit mod_perl 2.' },
- { id => 17, item_id => 9, heading => 'http://bilder.ecos.de - Gerald
Richter [rich...@ecos.de]', language_id => 'de', description => 'Dies ist die
Site für die Embperl ursprünglich geschrieben wurde. Es ist eine einfache
Bilddatenbank die touristische Bilder aus Rheinland-Pflaz enthält. ' },
- { id => 18, item_id => 9, heading => 'http://bilder.ecos.de - Gerald
Richter [rich...@ecos.de]', language_id => 'en', description => 'This was the
site Embperl was originally written for. It\'s a simple picture database which
contains pictures and tourist information for Rheinland-Pfalz/Germany. It\'s
intended as press information, to reduce the need for sending photographs by
real mail. You can view and search the pictures via the Internet or via a
direct dial-in. Download is only available for valid users and via direct
dial-in. It is also possible to maintain the database via the web and insert
new pictures and descriptions and change or delete old ones.' },
+ { id => 17, item_id => 9, heading => 'http://bilder.ecos.de - Gerald
Richter [richter at embperl dot org]', language_id => 'de', description =>
'Dies ist die Site für die Embperl ursprünglich geschrieben wurde. Es ist eine
einfache Bilddatenbank die touristische Bilder aus Rheinland-Pflaz enthält. ' },
+ { id => 18, item_id => 9, heading => 'http://bilder.ecos.de - Gerald
Richter [richter at embperl dot org]', language_id => 'en', description =>
'This was the site Embperl was originally written for. It\'s a simple picture
database which contains pictures and tourist information for
Rheinland-Pfalz/Germany. It\'s intended as press information, to reduce the
need for sending photographs by real mail. You can view and search the pictures
via the Internet or via a direct dial-in. Download is only available for valid
users and via direct dial-in. It is also possible to maintain the database via
the web and insert new pictures and descriptions and change or delete old
ones.' },
]
},
Modified: perl/embperl/trunk/eg/x/formvalidation.htm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/x/formvalidation.htm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/x/formvalidation.htm (original)
+++ perl/embperl/trunk/eg/x/formvalidation.htm Sat Sep 23 22:09:10 2023
@@ -85,7 +85,7 @@ only the server-side validation is perfo
<p><hr>
-<small>Embperl (c) 1997-2005 G.Richter / ecos gmbh <a
href="http://www.ecos.de";>www.ecos.de</a></small>
+<small>Embperl (c) 1997-2005 G.Richter / ecos gmbh <a
href="https://www.actevy.io";>www.ecos.de</a></small>
</body>
</html>
Modified: perl/embperl/trunk/eg/x/input.htm
URL:
http://svn.apache.org/viewvc/perl/embperl/trunk/eg/x/input.htm?rev=1912497&r1=1912496&r2=1912497&view=diff
==============================================================================
--- perl/embperl/trunk/eg/x/input.htm (original)
+++ perl/embperl/trunk/eg/x/input.htm Sat Sep 23 22:09:10 2023
@@ -10,7 +10,7 @@
source before testing the mail function</b>
[-
- $MailTo = 'rich...@ecos.de' ;
+ $MailTo = 'richter at embperl dot org' ;
@errors = () ;
if (defined($fdat{check}) || defined($fdat{send}))
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscr...@perl.apache.org
For additional commands, e-mail: embperl-cvs-h...@perl.apache.org
![http://www.ecos.de/embperl/images/EmbperlLogo.gif;S:http://www.ecos.de/embperl;LP:1;FORID:1;"](http://www.ecos.de/embperl/images/EmbperlLogo.gif;S:http://www.ecos.de/embperl;LP:1;FORID:1;"){kind=link}
![https://www.actevy.io/embperl/images/EmbperlLogo.gif;S:https://www.actevy.io/embperl;LP:1;FORID:1;"](https://www.actevy.io/embperl/images/EmbperlLogo.gif;S:https://www.actevy.io/embperl;LP:1;FORID:1;"){kind=link}