Re: Writing to a file

2003-12-05 Thread Gerald Richter
Pete Moran wrote:
> Since I have upgraded from 1.3 to 2.0, I dont seem to be able to write
> to a file
>
> [-
> open(TMP, "> /tmp/test");
> print TMP "THIS IS A TEST";
> close TMP;
>
>
> -]
>
> Results in 0 byte file being created any ideas why ?
>

The code looks ok, this should work with 2.0 without problems.

Maybe there is a permission problem. It's always a good idea to check return
values e.g.

open(TMP, "> /tmp/test") or die "cannot open ($!)" ;

Gerald




--
Gerald Richter ecos electronic communication services gmbh
IT-Securitylösungen * dynamische Webapplikationen * Consulting

Post:   Tulpenstrasse 5  D-55276 Dienheim b. Mainz
E-Mail: [EMAIL PROTECTED]  Voice:   +49 6133 939-122
WWW:http://www.ecos.de/  Fax: +49 6133 939-333
--
|
|   ECOS BB-5000 Firewall- und IT-Security Appliance: www.bb-5000.info
|
+-


-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



problem with sessions

2003-12-05 Thread Patrick.Gebhardt
hello guys,

my configuration:

Apache/1.3.26 (Unix) mod_perl/1.29

HTML::Embperl   1.3.6
Apache::Session 1.54
Apache::SessionX2.00b5

i'm using File Store and Semaphore Locking.

< httpd.conf --->

### log minimum + session output
PerlSetEnv EMBPERL_DEBUG "2097153"
PerlModule HTML::Embperl
AddType text/html .epl

SetHandler  perl-script
PerlHandler HTML::Embperl
Options ExecCGI


< /httpd.conf>

my problem:

any page with access to %udat or %mdat does not load, it simply hangs.
if i shutdown the apache following error message appears in "error_log":

[Fri Dec  5 11:47:54 2003] [warn] [5040]ERR:  32:  Warning in Perl code:
(in cleanup) Can't call method "update" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/SessionX.pm line 414 during
global destruction.
[Fri Dec  5 11:47:54 2003] [warn] [5044]ERR:  32:  Warning in Perl code:
(in cleanup) Can't call method "acquire_write_lock" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/Session.pm line 569 during global
destruction.

session files where created in /tmp/sessions:

-
---
ls -l /tmp/sessions
total 0
-rw-rw-r--   1 nobody   nobody 0 Dec  5 11:48
ca8c2eee8377a3b295b054fb4688c521
-
---


this is my test page: (i stripped all simple html output)
-
---
[- $udat{'foo'} = "bar"; -]
[- $mdat{'foo'} = "bar"; -]
-
---



at last, the /tmp/embperl.log (with no useful output, at least for me)
-
---
[5040]REQ:  Embperl 1.3.6 starting... Fri Dec  5 11:35:02 2003
 
[5040]REQ:  No Safe Eval  All Opcode allowed   mode = mod_perl (3)
[5040]REQ:  Package = HTML::Embperl::DOC::_1
[5040]Formdata... length = 17
[5040]Using APACHE for output...
[5040]Reading /data/test-cgi/treeloader.epl as input using PerlIO ...
[5040]ERR:  32:  Warning in Perl code:  (in cleanup) Can't call method
"update" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/SessionX.pm line 414 during
global destruction.
[5044]MEM: Load /data/test-cgi/treeloader.epl in HTML::Embperl::DOC::_1
[5044]CACHE: New File for '/data/test-cgi/treeloader.epl' (2eee80) in
'HTML::Embperl::DOC::_1' hash cache-key '/data/test-cgi/treeloader.epl'
[5044]REQ:  Embperl 1.3.6 starting... Fri Dec  5 11:47:43 2003
 
[5044]REQ:  No Safe Eval  All Opcode allowed   mode = mod_perl (3)
[5044]REQ:  Package = HTML::Embperl::DOC::_1
[5044]Formdata... length = 0
[5044]Using APACHE for output...
[5044]Reading /data/test-cgi/treeloader.epl as input using PerlIO ...
[5044]ERR:  32:  Warning in Perl code:  (in cleanup) Can't call method
"acquire_write_lock" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/Session.pm line 569 during global
destruction.


Any Help would be really appreciated !!!

regards 
Patrick



-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



AW: problem with sessions

2003-12-05 Thread Patrick.Gebhardt
Well, now i use File Store and File locking, now it works ...

can anyone please tell me how this semaphore locking works??

regards
Patrick

-Ursprüngliche Nachricht-
Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Gesendet: Freitag, 5. Dezember 2003 13:01
An: [EMAIL PROTECTED]
Betreff: problem with sessions


hello guys,

my configuration:

Apache/1.3.26 (Unix) mod_perl/1.29

HTML::Embperl   1.3.6
Apache::Session 1.54
Apache::SessionX2.00b5

i'm using File Store and Semaphore Locking.

< httpd.conf --->

### log minimum + session output
PerlSetEnv EMBPERL_DEBUG "2097153"
PerlModule HTML::Embperl
AddType text/html .epl

SetHandler  perl-script
PerlHandler HTML::Embperl
Options ExecCGI


< /httpd.conf>

my problem:

any page with access to %udat or %mdat does not load, it simply hangs.
if i shutdown the apache following error message appears in "error_log":

[Fri Dec  5 11:47:54 2003] [warn] [5040]ERR:  32:  Warning in Perl code:
(in cleanup) Can't call method "update" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/SessionX.pm line 414 during
global destruction.
[Fri Dec  5 11:47:54 2003] [warn] [5044]ERR:  32:  Warning in Perl code:
(in cleanup) Can't call method "acquire_write_lock" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/Session.pm line 569 during global
destruction.

session files where created in /tmp/sessions:

-
---
ls -l /tmp/sessions
total 0
-rw-rw-r--   1 nobody   nobody 0 Dec  5 11:48
ca8c2eee8377a3b295b054fb4688c521
-
---


this is my test page: (i stripped all simple html output)
-
---
[- $udat{'foo'} = "bar"; -]
[- $mdat{'foo'} = "bar"; -]
-
---



at last, the /tmp/embperl.log (with no useful output, at least for me)
-
---
[5040]REQ:  Embperl 1.3.6 starting... Fri Dec  5 11:35:02 2003
 
[5040]REQ:  No Safe Eval  All Opcode allowed   mode = mod_perl (3)
[5040]REQ:  Package = HTML::Embperl::DOC::_1
[5040]Formdata... length = 17
[5040]Using APACHE for output...
[5040]Reading /data/test-cgi/treeloader.epl as input using PerlIO ...
[5040]ERR:  32:  Warning in Perl code:  (in cleanup) Can't call method
"update" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/SessionX.pm line 414 during
global destruction.
[5044]MEM: Load /data/test-cgi/treeloader.epl in HTML::Embperl::DOC::_1
[5044]CACHE: New File for '/data/test-cgi/treeloader.epl' (2eee80) in
'HTML::Embperl::DOC::_1' hash cache-key '/data/test-cgi/treeloader.epl'
[5044]REQ:  Embperl 1.3.6 starting... Fri Dec  5 11:47:43 2003
 
[5044]REQ:  No Safe Eval  All Opcode allowed   mode = mod_perl (3)
[5044]REQ:  Package = HTML::Embperl::DOC::_1
[5044]Formdata... length = 0
[5044]Using APACHE for output...
[5044]Reading /data/test-cgi/treeloader.epl as input using PerlIO ...
[5044]ERR:  32:  Warning in Perl code:  (in cleanup) Can't call method
"acquire_write_lock" on an undefined value at
/usr/local/lib/perl5/site_perl/5.6.1/Apache/Session.pm line 569 during global
destruction.


Any Help would be really appreciated !!!

regards 
Patrick



-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



Re: problem with sessions

2003-12-05 Thread Gerald Richter
[EMAIL PROTECTED] wrote:
> Well, now i use File Store and File locking, now it works ...
>
> can anyone please tell me how this semaphore locking works??
>

Maybe your semaphore has the wrong owner. Use ipcs to show all semaphores
and ipcrm to delete the Apache::Session one. Apache::Session will create a
new one with the correct owner

Gerald



> regards
> Patrick
>
> -Ursprüngliche Nachricht-
> Von: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Gesendet: Freitag, 5. Dezember
> 2003 13:01
> An: [EMAIL PROTECTED]
> Betreff: problem with sessions
>
>
> hello guys,
>
> my configuration:
>
> Apache/1.3.26 (Unix) mod_perl/1.29
>
> HTML::Embperl 1.3.6
> Apache::Session 1.54
> Apache::SessionX 2.00b5
>
> i'm using File Store and Semaphore Locking.
>
> < httpd.conf --->
> 
> ### log minimum + session output
> PerlSetEnv EMBPERL_DEBUG "2097153"
> PerlModule HTML::Embperl
> AddType text/html .epl
> 
> SetHandler  perl-script
> PerlHandler HTML::Embperl
> Options ExecCGI
> 
> 
> < /httpd.conf>
>
> my problem:
>
> any page with access to %udat or %mdat does not load, it simply hangs.
> if i shutdown the apache following error message appears in
> "error_log":
>
> [Fri Dec  5 11:47:54 2003] [warn] [5040]ERR:  32:  Warning in Perl
> code: (in cleanup) Can't call method "update" on an undefined value at
> /usr/local/lib/perl5/site_perl/5.6.1/Apache/SessionX.pm line 414
> during global destruction.
> [Fri Dec  5 11:47:54 2003] [warn] [5044]ERR:  32:  Warning in Perl
> code: (in cleanup) Can't call method "acquire_write_lock" on an
> undefined value at
> /usr/local/lib/perl5/site_perl/5.6.1/Apache/Session.pm line 569
> during global destruction.
>
> session files where created in /tmp/sessions:
>
> --
---
> ---
> ls -l /tmp/sessions
> total 0
> -rw-rw-r--   1 nobody   nobody 0 Dec  5 11:48
> ca8c2eee8377a3b295b054fb4688c521
> --
---
> ---
>
>
> this is my test page: (i stripped all simple html output)
> --
---
> ---
> [- $udat{'foo'} = "bar"; -]
> [- $mdat{'foo'} = "bar"; -]
> --
---
> ---
>
>
>
> at last, the /tmp/embperl.log (with no useful output, at least for me)
> --
---
> ---
> [5040]REQ:  Embperl 1.3.6 starting... Fri Dec  5 11:35:02 2003
>
> [5040]REQ:  No Safe Eval  All Opcode allowed   mode = mod_perl (3)
> [5040]REQ:  Package = HTML::Embperl::DOC::_1
> [5040]Formdata... length = 17
> [5040]Using APACHE for output...
> [5040]Reading /data/test-cgi/treeloader.epl as input using PerlIO ...
> [5040]ERR:  32:  Warning in Perl code:  (in cleanup) Can't call method
> "update" on an undefined value at
> /usr/local/lib/perl5/site_perl/5.6.1/Apache/SessionX.pm line 414
> during global destruction.
> [5044]MEM: Load /data/test-cgi/treeloader.epl in
> HTML::Embperl::DOC::_1 [5044]CACHE: New File for
> '/data/test-cgi/treeloader.epl' (2eee80) in 'HTML::Embperl::DOC::_1'
> hash cache-key '/data/test-cgi/treeloader.epl' [5044]REQ:  Embperl
> 1.3.6 starting... Fri Dec  5 11:47:43 2003
>
> [5044]REQ:  No Safe Eval  All Opcode allowed   mode = mod_perl (3)
> [5044]REQ:  Package = HTML::Embperl::DOC::_1
> [5044]Formdata... length = 0
> [5044]Using APACHE for output...
> [5044]Reading /data/test-cgi/treeloader.epl as input using PerlIO ...
> [5044]ERR:  32:  Warning in Perl code:  (in cleanup) Can't call method
> "acquire_write_lock" on an undefined value at
> /usr/local/lib/perl5/site_perl/5.6.1/Apache/Session.pm line 569
> during global destruction.
>
>
> Any Help would be really appreciated !!!
>
> regards
> Patrick
>
>
>
> -
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
> -
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]

--
Gerald Richter ecos electronic communication services gmbh
IT-Securitylösungen * dynamische Webapplikationen * Consulting

Post:   Tulpenstrasse 5  D-55276 Dienheim b. Mainz
E-Mail: [EMAIL PROTECTED]  Voice:   +49 6133 939-122
WWW:http://www.ecos.de/  Fax: +49 6133 939-333
--
|
|   ECOS BB-5000 Firewall- und IT-Security Appliance: www.bb-5000.info
|
+-


-
To unsubscribe