Hello,
Trying to revive an old app, developped under Debian/wheezy (Apache
2.2). Now running Debian/stretch and Apache 2.4. libembperl-perl version
is 2.5.0-10 and perl version 5.24.1-3+deb9u2
I have two types of code accessing %udat :
This one doesn't work (anymore) :
id:[+ $udat{'id'} +]
[-
use Data::Dumper;
$req = shift;
print OUT "fdat : ".Dumper(%fdat);
-]
This will print in a terminal.
Better :
[-
use Data::Dumper;
$req = shift;
warn "fdat : ".Dumper(%fdat);
-]
To see the result in apache's error.log
-
Donavon,
Could you try this script (as the doSomething.epl of your $.ajax()
example) ?
[-
use Data::Dumper;
$req = shift;
print OUT "fdat : ".Dumper(%fdat);
-]
Just to be sure %fdat is empty.
-
To unsubscribe, e
We would like to create an API using REST and EMBPERL. Did you come
up with a working solution to implement REST with embperl?
Yes, for my little use everything is working nicely.
I attach the tiny project. It's quite raw and in french. If you need any
explanation, feel free to ask.
Best reg
Le 24/08/2015 19:57, Jim Howard a écrit :
Darn. My only other bit of advice was "Are you sure Embperl is best for
this?"
No, I'm not sure it's "the best". But I'm sure it's possible (see below).
My company maintains a large Embperl app, but we use other tools for
REST/JSON (one of the reason
Hello,
I am trying to implement a simple REST/JSON server in embedded perl but
I don't understand how I can retrieve the data sent to me.
I test with this command :
curl -i -X GET -d '{"name":"john"}' http://omico.miaou/rest/notifent.html
And the following code shows nothing (apart from th
Hello,
I am trying to implement a simple REST/JSON server in embedded perl but
I don't understand how I can retrieve the data sent to me.
I test with this command :
curl -i -X GET -d '{"name":"john"}' http://omico.miaou/rest/notifent.html
And the following code shows nothing (apart from the
Hello,
I am trying to implement a simple REST/JSON server in embedded perl but
I don't understand how I can retrieve the data sent to me.
I test with this command :
curl -i -X GET -d '{"name":"john"}' http://omico.miaou/rest/notifent.html
And the following code shows nothing (apart from th
Hi Michael,
Le 18/06/2014 13:03, Michael Stevens a écrit :
> How can we get embperl working nicely with utf-8?
>
> I've set the content-type on my pages, I still find that in order to get
> utf-8 form submissions processed correctly I have to add something like
> this:
>
> for my $key (keys %fda
Gerald,
Le 03/07/2013 17:47, Gerald Richter - ECOS a écrit :
sorry for the late reply.
No problem.
Perl utf8 flag does NOT says that your data is utf8 or not. It tell
us something about the internal representation of your data inside of
Perl.
I agree with that.
So utf8 data can have the
Hello,
Can someone help me understand what could cause this :
warn "\$content : ".(utf8::is_utf8($content) ? "utf8" : "not utf8");
warn "\$ticketdata[0]->[0] : ".(utf8::is_utf8($ticketdata[0]->[0]) ? "utf8" :
"not utf8");
warn "content4=$content";
if ($ticketdata[0]->[0] ne $content) {
w
Hi,
Glad you managed to do it and thanks for your feedback.
Le 15/10/2012 13:42, oldbrad a écrit :
In my httpd.conf I changed HTML::EmbperlObject to Embperl::Object and
removed PerlSetEnv EMBPERL_OBJECT_BASE base.epl because Embperl::Object
always looks for _base.epl, I think! So I just substit
Hello,
I'm calling a page with jQuery's $.ajax() and I want it to return a
status code (201 if ok, 400 if some parameters are missing). The goal is
to use .done() and .fail()
I guess that's the way to go but apart when doing redirects (with
$http_header_out('location',['/page',302]) )I don't
jEdit has a decent support for embperl (switches to/from html).
http://www.jedit.org/
-
To unsubscribe, e-mail: embperl-unsubscr...@perl.apache.org
For additional commands, e-mail: embperl-h...@perl.apache.org
word, the same for me :-)
Thanks Gerald for your work and support.
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer_\_V
-
To unsub
re-lock immediately after ?
I store things in %udat only after authentication. Could I globally
disable session locking and enable it only when writing to %udat ?
Thanks for your help,
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant C
en by this ? Could you add a word on this
in the INSTALL.pod for Debian users ?
Thanks a lot for your quick answer, sorry for the trouble.
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer
/usr/local/lib/perl/5.14.2/auto/Embperl/Embperl.so
Apache starts fine but throws this error as soon as I try to get to an
embperl page.
What am I missing ?
This is on a fresh Debian Wheezy. Google's not my friend on this.
Thanks for your help.
--
Jean-Christophe Boggio
Le 03/09/2012 09:22, rich...@ecos.de a écrit :
The good news is that I currently working on a payed project which
includes fixing Embperl for Perl 5.14 & 5.16, so hopefully there will
be a new release in a few weeks, which solves all these problems.
Great news, be strong !
--
Jean-Christ
lains everything.
If you use "my @tmp " instead it should work, or you can avoid cleaning up @tmp
by putting it's
> name into %CLEANUP with value 0
(http://perl.apache.org/embperl/pod/doc/Embperl.-page-5-.htm#sect_28)
Thanks a lot for the explanations and tips. It is very cle
ly, @verdict is a very small array so it doesn't add too much overhead.
> puzzling ! :(
Crazy ! Maybe Gerald has some explanation or I've missed something in the
documentation.
Thanks for your help,
--
Jean-Christophe Boggio
3BFC3A0 00104A46 49460001 ..JFIF..
0x0010: 01010048 0048 C3BFC39B 00430001 ...H.H...C..
Thanks for your suggestion.
I wonder if I'm the only one on this list to upload non-7 bit files in HTTP
with embperl ?
If so, it *has* to come from my config.
--
Jean-Christophe B
If you have ideas of where/what I can look next...
Thanks for your patience,
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer_\_V
IP aa.aa.aaa.aa.39528 > bb.bbb.bb.bb.80: tcp 0
0x: 4500 003c
the
same size ?
Last clue : it *seems* that when I restart apache I can reliably do ONE upload.
I run out of ideas so if anyone has one, I'll take it. Thanks for your help.
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant C
I do something with $buffer here ?
print FILE $buffer;
}
close(FILE);
}
}
-]
And inside a loop :
Thanks for your
Gerald,
Le 09/03/2012 23:23, rich...@ecos.de a écrit :
If you are sure that is not a problem of your module, then I would:
I'm sure it *is* a problem with my module.
- move "sub BEGIN { }" and the "use ..." to a startup.pl file which call on
server startup (PerlRequire in httpd.conf)
I d
Hours of "debugging" later, no real success.
(Many thanks to those who gave hints via private emails)
1) Modified my package so there's only one package/one object in the source.
2) Renamed the getuser() function so it's called MYgetuser
3) Calling code looks like this :
[-
sub BEGIN {
m
Hello,
I have a simple page that finishes with this :
[$ if (1) $]
identity
[$ else $]
User not found
[$ endif $]
But I get *both* results (the form *and* the "user not found" message).
Well, maybe I should reword my question.
I want to place links to PDF files on my site like :
Click here to download
And I want to log the fact that someone downloaded the file.
So I set Apache up so that all PDF files are handled by Embperl :
EMBPERL_OBJECT_BASE base.epl
SetHandler perl-s
Hello,
I have a site where the config is a little strange. It works for years but I
just discovered it fails for (at least) one file. Here is the scenario :
I want to log (in a DB) all PDF downloads. So I set up things this way :
EMBPERL_OBJECT_BASE base.epl
oad, so $req would be
invalid on the subsequent requests anyway.
By "initial load", you mean "the first time apache sees the code" ? Or the
first time this code is "executed" in the Execute() chain ?
Thanks again for your help.
--
Jean-Christophe Boggio
Gerald Richter - ECOS a écrit :
just use $epreq, it's a global and works everywhere
That's perfect, thanks Gerald.
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer
I can't get the values in $req from subs.epl and
I need my $req->{dbh}...
Any clue ? Thanks for your help,
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Co
.epl file containing
[- Execute('*'); -]
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer_\_V
-
To unsubscribe, e-mail: embperl
olution (suggested by Gerald).
Though I don't want anything else than utf-8 so it doesn't harm.
Any idea ?
Thanks for your help,
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org
; way :
Encode::_utf8_on($fdat{$_}) for keys %fdat;
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer_\_V
-
To unsubscribe,
.
PS: Embperl 2.2.0-3.1 on Debian/Lenny 5.0.4 with apache 2.2.9-10+lenny6
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Independant Consultant and Developer_\_V
-
To
Hi Gerald,
Gerald Richter - ECOS a écrit :
Setting EMBPERL_OUTPUT_MODE should solve your problem:
http://perl.apache.org/embperl/pod/doc/Config.-page-2-.htm#sect_44
No, I don't want embperl to generate the final /, I just want it not to
break my code when it adds things to it.
--
Hello,
I recently had a problem with tags : I didn't set a "value" myself :
Embperl did but at the end of the tag resulting in this :
Which, of course, doesn't validate. I solved it by forcing the value myself.
libembperl-perl 2.2.0-3.1 on Debian 5.0.4
---
quot; things...
I see what you mean by "funny" things, thanks for the tip, I probably would have
slipped on that.
Have a nice day,
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\
it does not seem to work. How should I do this (what is
the right way of doing this with embperl) ?
Maybe some hardcoded use lib "xxx" inside startup.pl ?
Thanks for your help !
--
Jean-Christophe Boggio -o)
embp...@thefreecat.org /\\
Indepe
Ben Hiebert wrote :
Perl usually
tries to guess at the best encoding when it takes in the data and then
encodes it internally as best it can. You may have a problem where the
data comes in as ISO88591 but perl thinks it is UTF8 data, encodes it
internally as UTF8 and then prints out the UTF8-
Hello,
I have a fully UTF8 encoded site in which I want users to upload files
(simple :encoding(iso-8859-1)","sconet1.csv") or print OUT
$!;
my $buffer;
while (read($fdat{efilename},$buffer,32768)) {
print FILE $buffer;
}
PMFJI, I always use embperl with stock Debian/Ubuntu packages and don't
see the problems you experience. I recently upgraded my dev/test server
to lenny and had no problem (apart from Perl 5.8 -> 5.10 issues).
Neil Gunton wrote :
PerlSetEnv EMBPERL_APPNAME neilgunton_dev
I think in version
's quite simple :
[$ syntax EmbperlBlocks $]
Switches to what used to be called "optDisableHtmlScan" (more
self-explicit to me)
[$ syntax Embperl $]
Switches back to "normal" mode
Exactly what I was looking for. I won't see these ">" again.
--
(o- Jean-Christ
s. On a big page with lots of tags
it becomes significant.
Is there a way to disable embperl's reinterpretation of the HTML code ? I never
use the auto-table-like features.
Thanks,
--
Jean-Christophe Boggio -o)
[
46 matches
Mail list logo