My original posting is below. I was having difficulty following the perl
manual that I have, but realized that I was trying to print a value in the
array that I have that did not exist. Here is what I came up with:
#!/bin/perl
eval 'use Oraperl; 1';
print "begin\n";
$name1 = 'first';
$value1 = 'Steve';
$name2 = 'last';
$value2 = 'Spalding';
_at_POST = (
[ "$name1", "$value1" ],
[ "$name2", "$value2" ],
);
print "Printing the array\n";
print "\n";
print $POST[0][0];
print "\n";
print $POST[0][1];
print "\n";
print $POST[1][0];
print "\n";
print $POST[1][1];
print "\n";
print "\n";
exit 0;
> ----------
> From: Spalding, Stephen[SMTP:SSpaldin_at_mem-ins.com]
> Sent: Thursday, July 23, 1998 3:50 PM
> To: 'alpha-osf-managers_at_ornl.gov'
> Subject: Perl
>
> Does anyone have any examples of how to do multi-dimensional arrays in
> perl?
>
> Thanks!
>
>
> Stephen Spalding
> Associate System Administrator
> Missouri Employers Mutual Insurance
> sspaldin_at_mem-ins.com
> 1000 West Nifong
> Columbia, MO 65203
> (573) 499 - 4230
> (800) 442 - 0590
> fax (573) 499 - 4310
>
Received on Thu Jul 23 1998 - 21:08:34 NZST