Re: Here construct not working

2004-07-01 Thread David Arnold
John, Thanks. That's it. At 07:27 PM 7/1/04 -0700, John W. Krahn wrote: >On Thursday 01 July 2004 18:59, David Arnold wrote: >> >> All, > >Hello, > >> For this: >> >> #! /usr/bin/perl -w >> # file: stein_test_DBI_table.pl >> >> use strict; >> use Tie::DBI (); >> >> my $DB_NAME = 'test_www'; >> my

Re: Here construct not working

2004-07-01 Thread John W . Krahn
On Thursday 01 July 2004 18:59, David Arnold wrote: > > All, Hello, > For this: > > #! /usr/bin/perl -w > # file: stein_test_DBI_table.pl > > use strict; > use Tie::DBI (); > > my $DB_NAME = 'test_www'; > my $DB_HOST = 'localhost'; > > my %test_users = ( > 'root'=> [qw(user,authors,admin

Re: Here construct not working

2004-07-01 Thread Randy W. Sims
On 7/1/2004 9:59 PM, David Arnold wrote: All, For this: #! /usr/bin/perl -w # file: stein_test_DBI_table.pl use strict; use Tie::DBI (); my $DB_NAME = 'test_www'; my $DB_HOST = 'localhost'; my %test_users = ( 'root'=> [qw(user,authors,admin 5 superman)], ^ ^

Here construct not working

2004-07-01 Thread David Arnold
All, For this: #! /usr/bin/perl -w # file: stein_test_DBI_table.pl use strict; use Tie::DBI (); my $DB_NAME = 'test_www'; my $DB_HOST = 'localhost'; my %test_users = ( 'root'=> [qw(user,authors,admin 5 superman)], 'george' => [qw(users 3 jetson)], 'winnie' => [qw(user,authors