binding columns on aliased columns...

From: Jm (jerome_at_gmanmi.tv)
Date: 06/16/04 

To: "'DBI-USERS@PERL.ORG'" <DBI-USERS@perl.org>
Date: Wed, 16 Jun 2004 15:28:17 +0800

Hi,

        i have a select statement with alias on the select statements...

SELECT sum(two_fifty_traffic) as tf1, sum(fifteen_traffic) as tf2,
sum(twenty_traffic) as tf3, sum(text_traffic) as tf4, sum(ringtone_traffic)
as tf5, sum(logo_traffic) as tf6, sum(picmsg_traffic) as tf7,
sum(dlr_sent_twofifty) as tf8, sum(dlr_sent_fifteen) as tf9,
sum(dlr_receive_twofifty) as tfa, sum(dlr_receive_fifteen) as tfb,
sum(dlr_sent_zero) as tfc, sum(dlr_receive_zero) as tfd FROM smart_mrtg WHERE
trunc(date_inserted) = trunc(sysdate)

my( $tf1, $tf2, $tf3, $tf4, $tf5, $tf6, $tf7, $tf8, $tf9, $tfa, $tfb, $tfc,
$tfd );

$sth_smart_hits->bind_columns( undef, \$tf1, \$tf2, \$tf3, \$tf4, \$tf5,
\$tf6, \$tf7, \$tf8, \$tf9, \$tfa, \$tfb, \$tfc, \\
$tfd );

This is line 104 -> print "$tf1, $tf2, $tf3, $tf4, $tf5, $tf6, $tf7, $tf8,
$tf9, $tfa, $tfb, $tfc, $tfd" . "\n";

but it gives me this error..

Use of uninitialized value in concatenation (.) or string at
./send-telco-stats.pl line line 104

TIA