'libapreq-0.30_01 set array'

[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl
Subject:    libapreq-0.30_01 set array
From:       Thomas Drillich <drillich () uniserve ! de>
Date:       1999-03-16 15:39:11
[Download RAW message or body]

Hello,

the following code, does not run
it returns the string 'ARRAY(0x....)'.
	Array Args
	in  zz=one two three
	out zz=ARRAY(0x84d9a4c)
#------------------- code ------------------------	
use strict;
use Apache::Request ();

my $r = shift;
my $apr = Apache::Request->new($r);
$apr->send_http_header('text/html');

my(@v)=(qw(one two three));
$apr->param('zz'=>\@v);
my(@x)=$apr->param('zz');
my($z)=$apr->param('zz');
my($title)=q(Array Args);
print <<EOF;
<HTML>
<HEAD><TITLE>$title</TITLE></HEAD>
<BODY>
<h1>$title</h1>
</head>
<body>
<pre>
in  zz=@v
out zz=@x
</pre>
</body>
</html>
EOF
#------------------------------------------------------


is that a bug or my fault.

[prev in list] [next in list] [prev in thread] [next in thread]
Configure | About | News | Add a list | Sponsored by KoreLogic