<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=us-ascii">
<meta name=Generator content="Microsoft Word 11 (filtered medium)">
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style>
<![endif]-->
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman";}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{color:purple;
text-decoration:underline;}
p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig
{mso-margin-top-alt:auto;
margin-right:0in;
mso-margin-bottom-alt:auto;
margin-left:0in;
font-size:12.0pt;
font-family:"Times New Roman";}
span.EmailStyle17
{mso-style-type:personal-reply;
font-family:Arial;
color:navy;}
@page Section1
{size:8.5in 11.0in;
margin:1.0in 1.25in 1.0in 1.25in;}
div.Section1
{page:Section1;}
-->
</style>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang=EN-US link=blue vlink=purple>
<div class=Section1>
<p class=MsoNormal><b><font size=2 face=Tahoma><span style='font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>From:</span></font></b><font size=2
face=Tahoma><span style='font-size:10.0pt;font-family:Tahoma'>
austin-bounces+barron.snyder=wholefoods.com@pm.org [mailto:austin-bounces+barron.snyder=wholefoods.com@pm.org]
<b><span style='font-weight:bold'>On Behalf Of </span></b>CaptNemo<br>
<b><span style='font-weight:bold'>Sent:</span></b> Wednesday, October 18, 2006
5:56 PM<br>
<b><span style='font-weight:bold'>To:</span></b> austin@pm.org<br>
<b><span style='font-weight:bold'>Subject:</span></b> APM: Dumb program acting
funny...</span></font><o:p></o:p></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Arial><span style='font-size:12.0pt;
font-family:Arial'>Okay, instead of just returning the first 3 records, I
modified it to print the whole line of records but now it acts up....<br>
My database is 36 records wide and when I run it, I get:<br>
<br>
</span></font>[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value
in concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in concatenation
(.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<o:p></o:p></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'>…<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Arial><span style='font-size:12.0pt;
font-family:Arial'>Why am I getting <br>
</span></font><x-tab> </x-tab>[Wed
Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in concatenation
(.) or string at ./dbquery.pl line 34.<br>
<font face=Arial><x-tab><span style='font-family:Arial'> </x-tab><x-tab> </x-tab>...
and then correct data!?!?!<br>
<br>
</span></font><o:p></o:p></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'>----- 8< SNIP 8< ----------------------<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>I’m fairly new to Perl but I’ve
come across this myself. It’s just a warning. As I understand it, you’re
query is returning records that may have NULL values in them that you’re
then adding these NULL values to an array. The reason you’re seeing the
warnings interspersed with your output is that everthing is being directed to
the same place (the program output/STDOUT and STDERR).<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>Someone please correct me if I’m way
offbase on this.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>-Barron<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<div>
<p class=MsoNormal><font size=3 color=navy face="Times New Roman"><span
style='font-size:12.0pt;color:navy'> <o:p></o:p></span></font></p>
</div>
<div>
<div class=MsoNormal align=center style='text-align:center'><font size=3
face="Times New Roman"><span style='font-size:12.0pt'>
<hr size=2 width="100%" align=center tabindex=-1>
</span></font></div>
<p class=MsoNormal><b><font size=2 face=Tahoma><span style='font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>From:</span></font></b><font size=2
face=Tahoma><span style='font-size:10.0pt;font-family:Tahoma'>
austin-bounces+barron.snyder=wholefoods.com@pm.org [mailto:austin-bounces+barron.snyder=wholefoods.com@pm.org]
<b><span style='font-weight:bold'>On Behalf Of </span></b>CaptNemo<br>
<b><span style='font-weight:bold'>Sent:</span></b> Wednesday, October 18, 2006
5:56 PM<br>
<b><span style='font-weight:bold'>To:</span></b> austin@pm.org<br>
<b><span style='font-weight:bold'>Subject:</span></b> APM: Dumb program acting
funny...</span></font><o:p></o:p></p>
</div>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face=Arial><span style='font-size:12.0pt;
font-family:Arial'>Okay, instead of just returning the first 3 records, I
modified it to print the whole line of records but now it acts up....<br>
My database is 36 records wide and when I run it, I get:<br>
<br>
</span></font>[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value
in concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in concatenation
(.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in concatenation
(.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
[Wed Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in
concatenation (.) or string at ./dbquery.pl line 34.<br>
VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID DATA,VALID
DATA,VALID DATA,<br>
<br>
<font face=Arial><span style='font-family:Arial'>Etc.<br>
<br>
Why am I getting <br>
</span></font><x-tab> </x-tab>[Wed
Oct 18 18:52:56 2006] dbquery.pl: Use of uninitialized value in concatenation
(.) or string at ./dbquery.pl line 34.<br>
<font face=Arial><x-tab><span style='font-family:Arial'> </x-tab><x-tab> </x-tab>...
and then correct data!?!?!<br>
<br>
<br>
<br>
HERE's the Proggy<br>
--------------------------------------------------<br>
</span></font>#!/usr/bin/perl -wT<br>
use CGI qw(:standard);<br>
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);<br>
use DBI;<br>
use strict;<br>
<br>
<br>
my $dbdriver = $ARGV[0];<br>
my $db = $ARGV[1];<br>
my $dbuser = $ARGV[2];<br>
my $dbpasswd = $ARGV[3];<br>
my $dbtable = $ARGV[4];<br>
my $condition = $ARGV[5];<br>
<br>
my @row_array;<br>
my $row;<br>
<br>
<br>
if ( $#ARGV ==5 )<br>
<x-tab> </x-tab>{<br>
<br>
<x-tab> </x-tab><x-tab> </x-tab>my
$dbh = DBI->connect( "DBI:$dbdriver:$db",$dbuser,$dbpasswd,)<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>||
die "Database connection not made: $DBI::errstr";<br>
<x-tab> </x-tab><x-tab> <br>
</x-tab><x-tab> </x-tab><x-tab> <br>
</x-tab><x-tab> </x-tab><x-tab> </x-tab>my
$sth = $dbh->prepare("SELECT * FROM $dbtable WHERE $condition")<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>or
die $dbh->errstr;<br>
<x-tab> </x-tab><x-tab> </x-tab>$sth->execute()
or die $dbh->errstr;<br>
<x-tab> </x-tab><x-tab> <br>
</x-tab><x-tab> </x-tab><x-tab> </x-tab>while
(@row_array = $sth->fetchrow_array)<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>{<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>foreach
$row (@row_array)<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>{<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>print
"$row,"; # <------ THIS IS LINE 34<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>}<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>print
"\n";<br>
<x-tab> </x-tab><x-tab> </x-tab><x-tab> </x-tab>}<br>
<x-tab> </x-tab><x-tab> </x-tab>$dbh->disconnect();<br>
<x-tab> </x-tab>}<br>
<x-tab> </x-tab>elsif ( $#ARGV
<= 4 ) {<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"\n-----------------------------ERROR------------------------------\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"NOT ENOUGH ARGUMENTS\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"dbquery.pl usage: dbquery.pl DBDRIVER DB DBUSER DBPASSWORD DBTABLE
\"CONDITION\"\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"NOTE: DBDIVER is usually \"mysql\" but it can be other things
like \"oracle\".\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
" EXAMPLE: dbquery.pl mysql
databas...\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"NOTE: The total CONDITION must be in quotes with the matching data in
single quotes. \n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
" EXAMPLE: \"product LIKE
'bicycle'\"\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"---------------------------END
ERROR----------------------------\n\n";<br>
<x-tab> </x-tab>}<br>
<x-tab> </x-tab><x-tab> </x-tab>else
{<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"\n-----------------------------ERROR------------------------------\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"TOO MANY ARGUMENTS\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"dbquery.pl usage: dbquery.pl DBDRIVER DB DBUSER DBPASSWORD DBTABLE
\"CONDITION\"\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"NOTE: DBDIVER is usually \"mysql\" but it can be other things
like \"oracle\".\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
" EXAMPLE: dbquery.pl mysql
databas...\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"NOTE: The total CONDITION must be in quotes with the matching data in
single quotes. \n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
" EXAMPLE: \"product LIKE
'bicycle'\"\n";<br>
<x-tab> </x-tab><x-tab> </x-tab>print
"---------------------------END
ERROR----------------------------\n\n";<br>
<x-tab> </x-tab>}<o:p></o:p></p>
</div>
</body>
</html>