Re^3: Template::Toolkit - How do i access alias-based results?

Yes, printing a Dumper output of the data structure you create in # do stuff or even better, the data structure that you give to Template::Toolkit would help to find out what you need to do to access the elements of the data structure.

Comment on Re^3: Template::Toolkit - How do i access alias-based results? Download Code

Replies are listed 'Best First'.
Re^4: Template::Toolkit - How do i access alias-based results? by Yaerox (Scribe) on Jul 13, 2015 at 13:18 UTC
`# DB - Connect my $hDB = DBI->connect( "dbi:Oracle:dbname", "dbusername", "dbuserpass +wort", { AutoCommit => 0 } ); my $hStatement = $hDB->prepare("MY SQL HERE"); $hStatement->execute( ); while ( ( $var1, $var2, $var3) = $hStatement->fetchrow_array ){ push( @aRows, ( $var1, $var2, $var3 ) ); } $hStatement->finish; $hDB->disconnect; print Dumper( @aRows );` [download] output `$VAR1 = '11000530'; $VAR2 = '8041094A'; $VAR3 = 'Eingelesen'; $VAR4 = +'09-JUL-15'; $VAR5 = '528';` [download] Imo this shouldn't be interesting at all. The question is, how to access resultset when using joings on TT ...	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^4: Template::Toolkit - How do i access alias-based results?
by Yaerox (Scribe) on Jul 13, 2015 at 13:18 UTC

# DB - Connect
my $hDB = DBI->connect( "dbi:Oracle:dbname", "dbusername", "dbuserpass
+wort", { AutoCommit => 0 } );
my $hStatement = $hDB->prepare("MY SQL HERE");            
$hStatement->execute(  );
while ( ( $var1, $var2, $var3) = $hStatement->fetchrow_array ){
    push( @aRows, ( $var1, $var2, $var3 ) );
}
$hStatement->finish;
$hDB->disconnect;

print Dumper( @aRows );
[download]

$VAR1 = '11000530'; $VAR2 = '8041094A'; $VAR3 = 'Eingelesen'; $VAR4 = 
+'09-JUL-15'; $VAR5 = '528';
[download]

[reply]
[d/l]
[select]